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33 s 
3 . 7.0 TEST DESCRIPTIONS 


zc 7.1 TEST 1 CONTROL AND OPERATOR INTERACTION 
96 


. 


§? 7.1.) TION ] PRINTER Y, TEST R UP 
ES HR] BIR) Bes ahaa er 
$ ?.1. 1 SEC 
a a ae +E 1 seCTiON 2 fF DAVFU TESTS 
102 7.2 PRINTING TESTS 
ih 7.2.1 5 TA TRANSFER PATHS TEST 
THE 5-8-4 1851 : CHaRACTER Oe GENERATOR AND COMPARATOR TESTS 
6 7.2.3 V 
+55 28:5 TEST S SHTTLE PogIT HONING TEST 
as oS 12! § MULTIPLE LINE ADVANCE TEST 
130 7.2.7 TEST @ HIGH SPEED PRINT TEST “aes 
1d 72.8 TEST $ SINGLE CHARACTER, ALL COLUMNS TEST 
ilz 2-§-§ TEST 10 DRUM PATTERN TES 
ils 7.2.10 Te57 i 1} rauy 5 Lert FA HEDGES 
tis ai. : 
11 73.12 TS AVFU - LINE COUNT SLEWING TEST 
132 575775 . +2" 0 busts rue FHANNEL SLEWING TEST 
iis 7.3 SCOPE DRIVE TEST 
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1.0 ABSTRACT 


THE gine PRI PRINTER DIAGNOSTIC PROGRAM 1s Q1VI0ED_ INTO Tein Felt 
aelLe SRLEF ee SRPPT LONG OF EACH of Re B SENTED eta’ 

PRINT PATTERN IN fubse TESTS HAVE BEEN CHOSEN FOR EASE OF VISUAL 
VERIFICATION 


THE FIRST SECTION TO. CHECK-0 cESSOR INTERFACE 
CONTROL ELEC ETRON if ne fe fe NER con NISaTEONS, Sav BRIS. IT Witt 
ALSO PERFORM ALL TESTS NTION, THE SECOND 
SECTION I$ @ PRINTING TEST fits TO TEST THe CINE PRINTER MEGHENIS 
ITSELF. LAST SECTION IS & SCOPE ORIVER ROUTINE FOR USE IN TROUBLE 
SHOOTING THE PRINTER INTERFACE. 





ea 


2.0 REQUIREMENTS 


2.1 EQUIPMENT 
THIS DIAGNOSTIC SHOULD RUN ON ALL PDP-11 FAMILY COMPUTERS HAVING LINE 
PRINTER CONTROLS, LINE PRINTERS, AND TELETYPES COMPATIBLE WITH THE 
FOLLOWING: 

LPCil LINE PRINTER INTERFACE 


LPOS DATA PRODUCTS 132 COLUMN &4 OR 96 CHARACTER LINE 
PRINTER 
TELETYPE MODEL 33 OR EQUIVALENT CONSOLE UNIT 


2.2 STORAGE 
MEMORY LOCATIONS 0 - TO - 14600 ARE USED BY THIS OIAGNOSTIC. 


2.3 PRELIMINARY PROGRAMS 


Oe pena POP-11 DIAGNOSTICS SHOULD RUN ON THE PROCESSOR AND 


MRINOEC=11-O2LPK-E-D MACY11 27(732) 27-SEP-76 10:57 PAGE 4) 
oLPKE P11 


= o 


| MS 
are 
} _ 
ST 
i72 3.0 LOADING PROCEDURE 
| 1% 
| 125 
|} i 3.1 METHOD 
| ize POWER DOWN THE LINE PRINTER 
| 2: POWER UP THE PROCESSOR ONLY 
| 488 LORD THE BOOTSTRAP AND ABSOLUTE LOADERS 
| is: LOAD THE LP1L/LPOS DIAGNOSTIC PROGRAM TAPE 
| 16 
15s 4.0 STARTING PROCEDURE 
; | 
iz: 4.1 CONTROL SWITCH SETTINGS 
is: SET CONTROL SUITCHE (SEE SECTION 5.1 FOR DESCRIPTION OF 
ois ren EORETEONS) MAKE SURE SuiTCH Bris BOuN SEFORE STARTING. ™ tech 
ise 
i33 4.2 STARTING ADDRESS OR ADDRESSES | 
gO) HE INITIAL STARTING ADDRESS TO RUN THE ENTIRE LPLL/LOS DIAGNOSTIC 15 
55 feat THE PRINTING rests 1 S188) AT, POCATION E0¢8).. 10. RUN THE SPECT 
205 SCOPE BRIveR ROUT pobeess 20008) OR 720). 19 START cF 
a BAY STHER TEST USE THE UF et "ROORESS FROM THE FOLLOWING TABLE: 
207 
sé START ADDRESS TEST 
cus 
219 300 DAVFU ILLEGAL LORD TEST 
z1i 304 DAVFU NO STOP BIT TEST 
212 310 DAVEN LINE COUNT SLEW TEST 
sig 314 DAVFU CHANNEL SLEW TEST 
es 
zis 400 PRINT SPEED TEST USING MANUAL TIMING 
2:6 405 PRINT SPEED TEST USING KW1I-L 
Zi 410 PRINT SPEED TEST USING KW1I-P 
eis S14 CHECK TOP OF FORM SWITCH SETTINGS 





GO1 
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| DILPRE.PLI 
213 
221 60 TEST 2 INTERFACE 8 DATA PATHS TEST 
25 (ALSO GENERAL PRINT TEST STARTING ADDRESS) 
cc 
: 610 TEST 3 QNPARATOR TEST 
ees 614 Tet  SVER PRINT test 
226 $20 TEST & SHUTTLE POSITIONING TEST 
227 624 TEST & PRINT CONTR TEST 
=2e 630 Test 2 MULTIPLE LINE AOVANCE TEST 
=e3 634 tet @ UIGH SPEED RR INT TEST 
E30 E40 TEST 2 SINGLE CHAR, ALL COLUMNS 
E31 oo TEST 10 DRUM PATTERN CHAR TEST 
232 eS0 TET i] SeuRIOUS SeeMER FIRING TESTS 
Fick (LEFT & RIGHT WEDGES) 
ex 25 TEST i2 HARMER ALTONNENT 
gcc F 
Be 790 SCOPE DRIVER ROUTINE 
e27 720 SCOPE ORIVER WITHOUT LINE FEEDS 
ee 
233 THE PROGRAM WILL START THROUGH THE TEST SEQUENCE. BEGINNING UITH THE 
zi SELECTED TEST UNLESS SWITCH le IS SET TO LOOP ON TEST (SEE SECTION 
EME 
243 
E45 
es 4.3 PROGRAM AND/OR OPERATOR ACTION 
547 DURING INITIAL START-UP Tae THE LINE PRINTER DIAGNOSTIC TEST THE 
E-8 HEADER MESSAGE "LPOS PRINTER TEST” WILL WED Ou TON THE 
248 TELEPRINTER FOLLOWED BY XECUTION THE PRINTE RABY PORTION OF TEs 
eso 1. {PRINTING ER” THE TELEPRINTER FOLLOWING 
251 HE TES] HERDER PRINT-OUT INDICATES START OF THIS TEST SEQUENCE. THIS 
ese TEST 25__ CORRIED QUT BY AN INTERACTIVE EXCHANGE BE THEEN THE OPERATOR 
253 AND THE TEST PROGRAM. THE OPERATI DESCRIPTION OF THIS TEST 
254 RPPEARS AS PART OF THE TEST DESCRIPTION FOR TEST 1 (SEE SECTION 
255 7.1.1). Se TER SUCCESSFUL COMPLETION OF THIS SECTION OF TEST 1, THE 
25 PRINT SPEED. AND TOP OF FORM SUITCH SETTINGS TESTS WILL BE P PERFORMED. 
es? (SEE SECTIONS 7.1.2 AND 7.1.3 RESPECTIVELY.) IF THE ORVEU. is 8 RVAILASLE 
258 ako. Sutten 14° 18°set, THE DaveU Tests HILL ALSO BE PER 
259 COMPLETION OF ALL OF TEST I, PRESS CONTINUE TO THe BRINTING 
eed Heers DIRECTLY. NO OTHER GPERATOR ACTION WILL BE REQUIRED. 
Ete IN TEST 1 - SECTION 2 — PRINT SPEED TIMING 
ets TCH QO IS NOT READILY ACCESSIBLE 
264 ree), Sa? HAVING A SOFTWARE SWR, SO THIS TEST SHOULD NOT BE 
ze RUN IN THE MANUAL .MODE. 
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| 
| Bee 5.0 OPERATING PROCEDURE 
2s 
| 870 
| gi 
| 272 5.1 OPERATIONAL SWITCH SETTINGS 
és 
| EPS THE USE OF THIS PROGRAM ON PROCESSORS NOT HAVING A HARDWARE SWITCH 
27s REGISTER NECESSITATES OPERATOR INTERACTION: THE OPERATOR MUST SET UF 
| ere LOCATION 174 WITH THE SOFTWARE DISPLAY VALUES AND LOCATION 176 WITH 
ec: THE SOFTWARE SWITCH VALUES. 
ij 
| ee " . SWITCH FUNCTION IN “UP™ POSITION 
261 1 LOOP ON ERROR (IN TEST 1 ONLY) 
| Es 14 OPTIONAL DAVFU AVAILABLE 
| 28s 13 DOWN - &4 CHARACTER SET 
ee UP - 96 CHARACTER SET 
it =P 
eee 12 LOOP ON TEST 
€ 
230 ll SEND ONLY ONE CHARACTER TO LINE PRINTER IN 
2: SCOPE DRIVER - THEN HALT 
€ d 
2s3 0 USED FOR PRINT SPEED MANUAL TIMING IF NO 
ee : CLOCK AVAILABLE 
ez 1. SWITCH - 0 
“4 
 -BSe TO 10 START PRINTING IN THE MANUAL PRINT SPEED TEST PLAC 
Bes E IN THE UP POSITION. AT THE END OF ONE MIAUTE PU 
300 treat 0 DOWN. THE BEPORXIMATE PRINT SPEED WILL BE PRINTED 
= Sh HEE pn an EibeR HH hace age caHIG pS Tone 
is) 
| 365 BN RY EST Tr TUSING HANUGE FiMING ORF TP USING 
| 308 ANY INFERNAL och OPTION (KW11-L OR d=) 
| 26 2. SWITCH - 1! 
20 SHITCH 11 iN THE QSITION CAUSES. THE CONTENTS OF THE 
30 TCH REGISTER T oe” SENT ONLY ONCE TO THE LINE PRINTER THEN 
310 HE SCOPE DRIVER ROUTINE. TO SEND ANOTHER CHARACTER 
211 RESET suttcres AND DEPRESS CONTINUE. WITH SWITCH 11 DOWN 
212 THE SWITCH REGISTER IS SENT CONTINUOUSLY TO THE LI? RIN ch 
313 R “LINE FEED SENT AFTER EVERY 132 CHARACTESS. 10 STOP 
214 WEB Ne CHARACTERS, PUT SWITCH 11 UP. 


ee ee — 


—_———— me 
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315 
316 
31? 3. SWITCH - 12 

e 

315 SWITCH 12 IN THE ce POSITION IS USED TO AUTOMATICALLY LOOP ON 
320 fe as IF IN sa ORE le. robe MITCH 12 IN 
3] i pos IToh ai F ORC ANTLY LOOP ON 
322 G THE “Sarre DOWN POSIT 1h 
323 ol SaKES tHe BR Boor RESUME i S NORMAL test CEouENCE AT THE 
$e SORBLETION OF THE CURRENT TEST 
306 4. SWITCH - 13 
se ‘ 
328 SuITC H 13 SHOULD BE SET UP IF THE 96 CHARACTER SET IS 
325 AVAILABLE. IF THE 64 CHARACTER SET IS USED SWITCH 12 SHOULD 
225 BE DOWN. 
35 5. SWITCH - 14 
33. 
335 SWITCH 14 SHOULD BE SET UP IF THE OPTIONAL DAVFU IS AVAILABLE 
33 AND IT IS DESIRED TO RUN THE DAVFU DIAGNOSTIC TESTS. 
327 &. SWITCH - 15 
223 WITH SHITCH 15 IN THE DOWN POSITION THE PROGRAM WILL HALT 
356 AFTER AN ERROR TYPE OUT IN TEST WITH SWITCH 15 iN THE UP 
zi POSITION, THE PROGRAM WILL N O5e on THE ERROR IN TEST 1. 
343 REFER TO SECTION &.1 TO CONTINUE AFTER AN ERROR DURING ANY 
345 OTHER TESTS. 
34 
34e 
347 
a . S.2 I0T CHANGES 
356 THE LINE PRINTER STATUS IS LOCATION 177514 AS USED BY THE PROGRAM. 
3€] THE LINE PRINTER VECTOR ADDRESS IS LOCATION 1030 AS USES BY THE PROGRAM. 
3E2 THE LINE PRINTER PSW IS LOCATION 1032 AS USED BY THE PROGRAM 
5 THE LINE PRINTER BUFFER IS LOCATION T75ELE AS USED BY THE PROGRAM. 
355 FOR OF OTHER THA. THESE PLACE THE CORRECT STATUS LOCATION 1 IN pgeATION 
37 soe eT VECTOR asgebes IN LOCATION ects yes sits 85 Rdee ¢' Bey In 
355 LOCATION 1032(8) . 
366 
36] 
32 
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6.0 ERRORS 


&.1 COMPUTER DETECTED ERRORS 


i a ge on eeeion DESCRIBES (IN GENERAL) THE METHOD USED FOR 
INTERNAL ERR DETECTION AND ERROR DISPLAY» BY THE LINE PRINTER 
PineNOe te PROGR AM. MONITORING OF THE CURRENT CONDITION OF THE READY 
LINE AFTER EACH OPERATION IS CARRIED ON CONTINUOUSLY eae ALL TESTS 
HERE APPROPRIATE AND 13 DESCRIBED IN THE FOLLOW PARAGRAPHS. 
HOWEVER, ADDITIONAL The ING IS PERFORMED JA eel SURFING EXECUTION 
OF THE FIRST TEST. FOR A COMPLETE DESCRIPTION THE TESTING 
PROCEDURES USED IN TEST 1 AND THE CORRESPONDING ERROR © ae ONOITIONS, THE 
‘eV ine. IS REFERRED TO T DESCRIPTION OF THE TEST AND THE ‘TEST 


ERROR PRINT-OUTS SARE ot LIMITED TO THE ERROR NUMBER (ERROR COUNT). 
ADDITIONAL INF ION MAY BE OBTAINED FROM THE EST DESCRIPTION oR 
FROM THE LISTI NG. TO FIND THE ERROR IN THE LISTI SYMBOL 
TABLE AT THE END OF THE LISTING 70 FIND THE LEAT TON oF Fue TeEroa 
ERROR TAGS WILL BE LISTED AS “ERRXX” WHERE XX = ERROR NUMBER. 
IN GENERAL, THE TEST PROGRAM MONITORS PROPER OPERATION OF THE LINE 
PRINTER AFTER EACH PRINTER OPERATION HAS BEEN COMPLETED, THROUGH THE 
PRINTER “READY LINE AND THE SeTTIN OF THE CHARACTER FLAG OF THE 
PRINTER “DEMAND™ RETURN LINE WITH RE GARDS TO THE READY LINE, THE 
FOLLOWING ERROR CONBITIONS- IF DETECTED WITHIN THE LINE PRINTER 
ITSELF, WILL CAUSE THE READY LINE TO DROP: 
PAPER OUT OR TORN 
DRUM GATE OPEN 
RIBSON STALL CONDITION 
POWER SUPPLY FAULT 
HAMMER BANK FAULT 
DAVFU ERROR (IF AVAILABLE) 
SWITCHED OFF LINE 

H D THAT THE “DEMAND” RETURN PRINTER I 
Bet oy eFC ie tRINtER “REA ANS THEREFORE THEGE ITEMS Srout 
BE CHECKED FIRST IN CASE OF DIFFICULTY. 
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6.2 VISUALLY DETECTED ERRORS 


SINCE THE COMPUTER CAN ONLY DETECT THE CURRENT of Ona t iON OF THE READY 

AND DEMAND RETURN LINES AND DOES NOT Re ONAL D 

FROM THE LINE PRINTER, IT IS NECESSARY TO BYE INE tHe Pe PATTER 
VARIOUS TEST ROU OR RESORT 


HE y S 
PROCEDURES. AS PROVIDED BY THE SCOPE DRIVER ROUTINE o 0 Ee AND 
DIAGNOSE ADDITIONAL DIFFICULTITIES. DETAI TeILED DESCRIPTIONS OF EACH 
TEST PATTERN APPEARS IN THE beeCASPTIONN§ HE CORRESPONDING TEST 


7.0 TEST DESCRIPTIONS 
7.1 TEST 1 - CONTROL TESTS AND OPERATOR INTERACTIVE TESTS 


TEST 1 IS MADE UP OF FOUR SECTIONS LINKED TOGETHER AND EXECUTED IN 
Bag ae NCE AS A SINGLE TEST. THE FOLLOWING DESCROPTIONS TREAT EACH 
SECTION SPEARATELY. 


7.1.1 TEST 1 - SECTION 1 - COMMAND DECODE, CONTROL INTERFACE 


THIS PORTION OF TEST 1 5. DFAT eeR oh. J ee DECODE AND CONT 


ANKE Oe TEST. AND Ae ints ee of THE 1! wreeene i 
FACILITY. UPON NTA ENTRY INTO THIS ROU INE. MANUAL a 
IS REQUIRED TO TEST THE VARIOUS TESTABLE ERROR ( (NONSREROY) “COROITTON 


OF THE PRINTER. THE OPERATING SEQUENCE IS DESCRIBED IN DETAIL BELOW 


THE a ane 9 ae INE CONTINUOUSLY MONITORS THE FOLLOWING CONDITIONS 
WITH INTER AND ITS TRUE STATE AT THE CONTROL ELECTRONICS 
TATERPACE S CONDI TIONAL UPON NONE OF THEM EXISTING: 


PAPER OUT OR TORN 
UM GAT 


DRUM E OPE 
RISBON Saatt, goND TION 
POWER SUPPLY FUL 
HAMMER BANK FALL 

DAVFU ERROR (iF AVAILABLE) 
SWITCHED OFF LINE 


THE ee Oe on tu ga WHICH A] IS DESIGNED TO TEST 

THE PROPER OPERATION OF THE READY LINE AS IT APPEARS AT THE una come 
ELECTRONICS WITH RESPECT TO THOSE. OF THE ABOVE ITEMS WHICH ARE 
TESTABLE (I.E. - A,B,F8G) INITIAL MANUAL TEST SEQUENCE: 


1. AFTER “POWER ON - TURN On pt iNe HAS PEN TYPED ON THE 
TELEPRINTER BRING POWER THE LINE PRINTER AND TURN ON 
KING ; RE THAT THE PeeeR IS IN PLACE IN THE TRACTORS 

ba ne Ae HE DRUM GATE IS CLOSED 


NOUN CUT 








MAINDEC- pt areata -E-D 
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0-0 +60) bt CIO 
wco NCP onl dure Oooo 


» 
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10. 


li. 





DEPRESS CONTINUE, “READY SET OK - TRY TORN PAPER Sui ToH" WILL 
BE TYPED OUT IF PRINTER IS ON LINE AND NO ERRORS EXIS 


PAPER - TEAR THE fe he OFF BELOW T Ra oll DRUM GATE AND 
USE THE MANUAL TOP OF FORM SWITCH TO DRIVE ALL THE PAPES Out 
OF THE prere one OSSERVE THAT THE PRINTER READY LIGHT GOES 
OUT AND THE R ERROR LIGHT GOES lon ON THE PRINTER CONTROL 
PANEL. atteneT. Tp PLACE THE PRINTER LINE, THE ON-LINE 
J READY LIGHTS ON THE PRINTER EENTROL PANEL SHOULD REMAIN 


DEPRESS CONTINUE, AN ERROR TYPE-OUT (ERROR + 2) WILL 
Pe ANTICS PRINTER READY LINE REMAINS HIGH AT THE INTERFOCE 


READY - ie SUCCESSFUL_COMPLETION OF STEPS 3 AND 4 THE 
peo “ERROR SET OK = TURN ON LINE” WILL BE TYPED. RESTORE 
PAPER TO FE TRACTORS, CLOSE THe” DRUM GATE AND PLACE THE 
PRINTER IN THE READY-ON LINE STATE. OBSERVE THAT BOTH THE 
os AND READY LIGHTS COME ON ON THE PRINTER CONTROL 


DEPRESS CONTINUE AN ERROR TYPE-OUT (ERROR COUNT 4) WILL 
Occ THE PRINTER READY LINE DOES NOT GO HIGH AT THE 
Or Teer AcE ELECTRONICS. 


er th ae COMPLETION OF STEPS S & 6 THE 
MESS SET OK-T DRUM GATE SWITCH” WILL BE TYPED. 
OPEN THE PRINTER DRUM tate “AND OBSERVE THAT THE ON-LINE AND 
READY LIGHTS GO OUT AND THE DRUM GATE ERROR LIGHT GOES ON ON 
THE PRINTER CONTROL PANEL. 


DEPRESS CONTINUE AN ERROR TYPE-OUT (ERROR COUNT 5) WILL 
OCCUR IF THE PRINTER READY LINE APPEARS TO REMAIN HIGH AT THE 
INTERFACE HE ETRONTCS. 


READY - AFTER SUCCESSFUL COMPLETION OF ig ee 7 Ig 8 THE 
MESSAGE “ERROR SET OK - TURN ON LINE” WILL BE 


DEPRESS afShT IME 19 fEnetET eet THE Corman AND REGISTER TESTIN TING 
ALONG N ERRUPT TES! IF any ERROR CONDITION 
EXIST, ERROR TYPE- “OUTS ERRO EON WIL! ee 

PRINTED. CHECK THE LIS Ine een Spese IP Tone oF THESE ERRORS. 


BE SECTION 1. OF TEST 1 WILL BE ENTERED DIRECTLY UPON COMPLETION 
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7.1.2 TEST 1 - SECTION 2 - FRINT SPEED TIMING TEST. 


THIS ECTION OF TEST 1 IS DESIGNED TO TIME THE PRINTER FOR ge F 
MIN NUT, ans * HIS te ite “PRLiTER WILL PRINT eEe ace of FHE 
DRUM P XIMUM) FIRE AT iy OOIVER 
INST aNt Tip NWBNIMUM TRIN The nC C ECED. FOR EACH tae 


IF A KW11-L_OR KW11-P ARE AVAILABLE THEY WILL BE USED 70 TIME 


ITHER 
ad Bh ase, BOTH AL THNGNS HILL Be THE ht a me ie ues 


INSTRUCTIONS "WILL THE, ee ei” oe” oa BY 
pe ae TCH 0 Ne THE UP "HOST 1T0N THE ONE ru nincte 
Ion “10 E106. THE T Mes 2 


3 reek 3 R AN IMING OP Re a HO HE ON BEFORE 
a ad fp TEST. ate EVER wae “he rit of 1s USED carton HE END 0 
L MINUTE THE APPROXIMATE BRINT SPEED WILL BE TYPED ON BOTH THE 

aoe PRINTER AND LINE PRINTER. 


IF BOTH A KW11-L_OR KW11-P_ ARE AVAILABLE OR IT IS DESIRED TO MANUALLY 
TIME THE PRINTER IF EITHER IS AVAILABLE USE THE FOLLOWING START 
ADDRESSES TO RUN THE DESIRED PRINT SPEED TIMING TEST: 


400 FOR corey TIMING 
404 FOR KWll-L 
410 FOR KW11-P 


NOTE: IF THE LINE FREQUENCY is SO HZ. CHANGE THE CONTENTS OF “MINCNT 
TO. 5670(8) REFER TO THE END OF THE PRINTING ROUTINE. (SEARCH 
FOR "MINCNT” IN THE CROSS REFERENCE LISTING) 


sect TON 3 OF TEST 1 WILL BE ENTERED DIRECTLY AFTER COMPLETION OF 


7.1.3 TEST 1 - SECTION 3 - TOP OF FORM SWITCH TEST 


THIS TEST ORES aa POSITIONS OF ba | TOP_OF FORM SWITCH. THE PROGRAM 
WILL GIVE ORRECT SETTIN om . THE TOP OF FORM SWITCH ON ae 


ETY AFTER TTING 

DEPRESS CONTINUE 10 TEST mo curred POSITION. AFTER cHEcK Ne aL aut 
POSITIONS oar PRINTER OUTPUT CAN BE te VERIFIED. A LINE 

DASHES IS PRINTED a A STARTING POINT FOR EACH SETTING AND THEN 3 FRE 
3 ae Te TELLING HE PROPER SPACING (IN INCHES) FROM THE DASHED LINE 


THE MESSAGE “TURN ON DAVFU 
TO 11 INCHES” WILL BE TYPED 
be Poan SWITCH 15 ll INCHES 


UPON COMPLETION OF THIS SECTION OF TEST 1 

IF AVAILABLE AND RESET TOP OF FORM SWITCH 

HEN THE PROGRAM WILL HALT. RESET THE TOP 
AND TURN ON THE DAVFU (IF AVAILABLE). 


co - Cfo + rr or or? + 
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572 DEPRESS CONTINUE T0_ ENTER DIRECTLY INTO, jE PRINTING TEST SEGUENCE 
BVRILABLE (SHITCH 14 DOWN. 


Frdees Stabe f0\POPHERPHERGeeRERE EtnpbrageeT™™ aa 


7.1.4 TEST 1 - SECTION 4 - pavFU ERROR TESTS 


THIS et 28 OF TEST 1 CONTAINS TWO PARTS DESIGNED TO TEST THE DAVFU 
ERROR CONDITIONS. tHE FIRST PART OF THI reo) ATTEMPTS TO LOAD | 
peavey tek EES to DATA Den ee UMBER DATA WOR BETWEEN THE 


UL 

TO OCCUR IN THE LINE 2 INT ER. FAILURE TO CAUSE AN ERROR IN THE LINE 
PRINTER WILL CAUSE AN ERROR TYPE-OUT “ERROR COUNT 27" TO OCCUR. UPON 
SUCCESSFUL COMPLETION OF THIS PART OF THE TEST THE MESSAGE “ERROR SET 
- CLEAR AND TURN ON LINE” WILL BE TYPED. CLEAR THE FORMAT ERROR IN 
. THE PRINTER AND PLACE THE PRINTER IN THE READY -_ON LINE A ill # - PART 

TWO OF THIS TEST WILL NOW BE EXECUTED TO TEST THAT CHANNEL SLEW 
COMMANDS Ber enene ene BHANNEL Sb WITH_NO ETOP ants WILL CAUSE AN ERROR _IN 
THE LINE PRINTER. THE DAVFU WILL BE LOADED WITH ALL ae BE Maas THE 


n 
~I~s 
oe 


PREGRES SE ERLE Bee TRE oe Sad tol tates 


START LOAD AND STOP LOAD COMMANDS. cacy CHANNEL WILL BE TESTED 
UENCE STARTING HANNEL 0 THE ERR DOES NOT OCCUR 
MESSAGE “ERROR COUNT 31” WILL TYPED. UPON SUCCESSFUL CQ N 
HE TEST ON EACH CHANNEL SSAGE “ERROR SET OK -_C TRY _NEX 
NNEL” WIL TYPED. AFTER THIS MESS T PRINTER ERROR 


AND _PRESS CONTINUE. THE Davey WILL THEN’ BE RELOADED WITH ALL ZEROS 
AND THE NEXT CHANNEL WILL BE TESTED. 

UPON SUCCESSFUL COMPLETION OF THIS TEST, THE MESSAGE “ERROR SET 
OK_- CLEAR AND TURN ON LINE” WILL BE ya? 

CLEAR THE PRINTER ERROR AND PLACE THE PRINTER IN THE READY LINE 
STATE. DEPRESS CONTINUE TO ENTER THE PRINTING TEST SEQUENCE DIRECTLY 
STARTING WITH TEST 2. 


ODDO AD i ATOM O ATA TE AIT ATOAAlialialialealial tales talealtarealtaliaii alia iatealia falta) 


P 7.2 LINE PRINTER PRINTING TESTS 

607 TESTS 2 TO 12 PRODUCE VARIOUS PRINT PATTERNS DESIGNED FOR EASE OF 
£08 VISUAL VERIFICATION. THESE TESTS CHECK ALL OF THE VARIOUS PRINTING 
60S ASPECTS OF THE PRINTER. DETAILED DESCRIPTIONS OF EACH INDIVIDUAL TEST 
Py FOLLOWS. 

ble 7.2.1 TEST 2 - DATA TRANSFER PATHS TEST 

6123 THIS | TEST IS DESIGNED TO TEST THE DATA TRANSFER PATHS (WITH 
614 ALT TING D. ofERe FROM THE PROCESSOR INTERFACE THRU THE 
615 LINE SPRINTER INPUT REGIST INTO THE PRINTER’ UFFER. 

* 1p TERNATING HARACTERS ARE TRANSMITTED TO THE 
Bi? PRINTER ON A 132 cou = C HESE TERS ARE 
616 COMPLIMENTARY BITWISE, THEY PROVIDE BOTH A ONES AND cpnges CHECK OF 
6:5 .: », ALL TRANSMISSION LINES. ENO OF LINE IS SENSED WITHIN THE PROCESSOR 
Seo * GND A LINE FEED CHARACTER IS rene TQ PRINT EACH LINE. PRINTING 
be; “ OF THE TEST LINE is. RE 4 gl 32 TIMES, ALTERNATING THE COLUMN 
bee a patti OF THE AND “U" CHARACTERS TO PRODUCE A CHECKER-BOARD 
Secs * ITT " 


oS 
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cs 7.2.2 TEST 3 - CHARACTER GENERATOR AND COMPARATOR TEST 

b56 TEST. 2, 18 PRIMARILY TO TEST THE LINE PRINTER CHARACTER 
£25 fee er corPaRet OR LOGic ane 178 ABILITY 7 pervect AND ACT UPON 
630 ot PrINTRELE RO CLESAL (NON-PRINTING) CHARACTE ae a senits OF ALL 
63; 54 & PRINT Bere Pare ARE TRANSMITTED Th ~SESUENC TO THE LIN 
B32 PRINTER AND PRIN ON A SINGLE LINE BEGINN WITH THE SPARC 
£33 CHARACTER. THIS IS FOLLOWED BY AN ALTERNATE iN OF ALL &4 OR 32 
£35 TLLEGAL TERS, EACH OF WHICH. SHOULD BE CON R gC 79 R Space 
e3¢ CHARACTER PRODUCING NO VISIBLE PEINTING. THIS SEQUENCE OF Ft TERNATING 
636 ALL Pa NT TRACER FOLLOMED By at ILLEGAL CHARACTERS [5 
$37 rEPERTE 10 GLONG WITH EXTRA LI OF ILLEGAL CHARACTERS 
536 INS ERTER a Tig BEGINING OF THE rest 0 PRODUCE 21 LINES OF PRINT (11 
£35 SF WHICH WILL 

g4! ; 

646 7.2.2 TEST 4 - OVER PRINT TEST 

os 

ae Tels TEST CHECKS THE CARR Bce fETURN (015) CONTR FOR Ov NTZNG. A 
Fe sieeee ryt nreD athe” repro th one i pects a Hee a8 ect 
B47 ate nt aie SPace 1§ 528 NS cBnetes 6 Brodie NG A sgotcesoane 


BATTER. — OVERPR NED E°S SHOULD BE ALIGNED WITH THE FIRST E°S 


OCD 


2.4 TEST S“- SHUTTLE POSITIONING TEST 


THIS TEST CHECKS THE HAMMER SHUTTLE FOR ped sat ihe of Va! LINES 
OF £°S ARE PRINTED BY PRINTING A PAIR OF E'S TIME THEN 
DYERPR? NTING THOSE E’S PRINTED WITH SPACES AND ADDING phoTHER tg ae 
E*S 10 THE LINE | UNTIL THE LINE IS COMPLETED. THEN A FULL LINE O 

ene E.PEINTED FOR COMPARISON. A TOTAL OF 16 LINES ARE PRINTED SURING 


CECT COOLS CH CE CT CF CTS OF LE CTCF CFC 
Ry fonin UR PL 4 + 


cr 
“cr 
( 


v 
TE fe ORD OP UN e Cune- 


7.2.5 TEST & - PRINT CONTROL TEST 


ui 


te 

BEE THIS T CKS THE PRI NT CONTROL LOGIC BY ING MORE THAN 1 
2 eR ethic tc cr ag tet net ett a 
ef ZOMMaNO T S RECEIVED. ALL CBRCTERS i THE OF E Fast 132 ae SHOU 
670 cE bast THe HE PR S REN seice 9 F FULL L INE OF 13e 2 EROS THEN THE pee 
E53 EeTNTED INE SHOuED CONTA chy Bad THis 1S “FEFERTED © osiie ONES 
E73 TWOS, THREES @NO FIVES. THEN A LINE OF SP RCES ARE SENT AND 
£75 THE FULL SHERACTER SE Ft SEFORE THE LINE FEFO. BLANK LINE SHOULD SE 
E75 PRINTED. HE BLANK LINE, THE NUMBERS 6 TO 9 ARE SENT AS BEFORE. 
7é A TOTRL OF 11 LINES WILL BE PRINTED WITH THE MIDOLE LINE BLANK. 
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7.2.6 TEST 7 = MULTIPLE LINE ADVANCE TEST 


TEST op St Be BAT iRE LINE ADVANCE OF THE 
OF NTEG 


LINE PRINTERS. 6 
THEN THE PAPER 15 apiantee THAT NUMBER OF 


BLANK 
$, ANC 


S. _THUS THE NORBER PRINTED <" LL_ INDICATE THE NUMBER of 
S a eg THAT LINE. THE N “2 2 ay TS VARIED BETWEEN 2 AND 
NE OF ALL ZEROS WILL ENO THE T 

.? TEST 8 - HIGH SPEED PRINT TEST 


THIS TEST PRINTS AT A _ SPEED ye THAN 300 LINES PER MINUTE 
(APPROXIMATELY SOO LINES PER MINUTE) BY PRINTING FULL LINES sal na 

TERN AND THEN. SKIPPING FOUR (4) LINES AND PRINTING T 
| THIS WILL TEST THE HAMMER SUPPLY FOR MAXIMUM CURRENT Si URGE “ote 
a bite. FOR WORST CASE NOISE SINCE ALL HAMMERS WILL FIRE AT ONCE ON 


7.2.8 TEST 9 - SINGLE CHAR, ALL COLUMNS TEST 
pate TEST I$ pest ed AS _AN ae 1 OF be pl AS oe 


ASB CHARACTER CHECK OF T 132 COL F THE £4 0 
CHARAE SaneuriieD to THE Li FR ENTER AND PRINTED IN 
RSTETION, SAMPLE OF THE PRINT OUT FOLLOWS 

9999 2 ewww wn 99999 

99339---------- 33333 

RPRRR---------- 

BBEEB---------- BReSe 

27777----------22222 


7.2.9 TEST 10 - DRUM PATTERN TEST 


THIS TEST IS DESIGNED TO PRODUCE AN IMAGE OF 
alt ME R WORST CASE NOISE AND ENDURANCE TEST, 


TIRE DRUM PATTERN. 
A CHECK OF THE DRUM 


THE ENT 
AND 


7.2.10 TEST 11 - SPURIOUS HAMMER FIRING TEST 


yt Ma TS DESIGNED TO perect UR TOUS HAMMER FIRINGS AND DEFECTIVE 
IVERS DURING y ON__ OF oe h LINE PRINTER. THE PATTERNS 
farce PRODUCE BAe RISH LEFT WEDGES, ERCH COMPOSED OF 


132 LINES OF PRINT OeENG THE SRUM PATTERN AS FOLLOUS: 
LEFT HAND WEDGE - WILL END EACH LINE WITH A “?" CHARACTER. 
RIGHT HAND WEDGE - WILL START EACH LINE WITH A “?" CHARACTER. 


ANY PRINT OUTSIDE OF THE WEDGE WILL BE CAUSED BY A HAMMER MISFIRE 
HAMMER BOUNCE. 








| st il Seagate’ 0 


os ie ie 


“I~y~) 


frin'b tatur-€ 
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7.2.31 TEST 12 - HAMMER ALIGNMENT T 


rs Sout INE IS DESIGNED TO BE USED AS A DRIVER FOR H@MME 
PGNMENT AND ZNTENSITY + Be NTS ON THE LINE PR NERS 2 THIS TEST 
INTS A FULL 132 COLUMN LI CHARACTERS FOR & 


7.2.12 TESTS D1 8 D2 - DAVFU.LINE COUNT SLEWING TESTS 


THIS TEST IS DESIGNED TO TE I alt LINE COUNT METHOD OF PAPER CONTROL 
SING THE DAVFU. BEFORE = TING THIS TEST, A MESSAGE WILL BE TYPED 
By ak THE OPERATOR rane ba TEST TS ARE BEING RUN THE 


BE  OROED 
-GHRaNDE writ BE reeteo IN TURN STARTING WITH A SLEW 


Pint ‘Ciie showo'Be Peintea"ace On che Cine =—-dr SL Bleo “4 
THEN ERCH OF THE REMAINING 


RA NENDS Witt, EF Testeoe tee Nene oe Lie A LINE WILL BE PRINTED 

I CORRECT NUMBER OF BL BLANK LINES BETWEEN THE LEST PRINTED 
EINE. AFTER COMPLETION OF TEST THE NCE [IS 
+e? CHANG ING. Tre TWO (2) wnigsto BITS IN THE SAPER 
TEST 


Lafinte tHe 
Eee 
oT ol 


fe 
632 
x» 
4 


THEY HAVE NO EFFECT ON THE DAVFU. UPON 
D2, TEST D3 IS ENTERED DIRECTLY. 


ow 


7.2.13 TEST D3 - DAVFU CHANNEL SCEW COMMAND TEST 


THIS TEST 13 DESIGNED TO TEST THE CHANNEL SLEW COMMANDS ON THE . DAVFU. 
THE DAVFU IS FIRST LOADED, THEN EACH OF THE CHANNELS [IS TESTED IN TURN 
STARTING WITH CHANNEL O. THE DATA PATTERNS (STOP BITS) LOADED INTO 
THE DAVFU ARE CHOSEN SUCH THAT NO TWO ADJACENT CHANNELS HAVE THE SAME 
a CHANNELS 1 AND 7 oe ONE BLANK LINE SETWEEN EACH 


PRINTED LINE. L BAILE CAUSE THO ELatK LINES SETHEEN 
cacy PRINT gD Cine. CHANNELS 2 AND 9 HILL CAUSE T LINES 
BETWEEN EACH inreD LINE. CHANNELS 4 AND 1 wilt CAUSE s1x BLANK 
LINES BETWEEN E ee CHANNELS S AND 1] WILL CAUSE 24 LINES 
BETMEEN EACH PRINTED “LINE. | CHANNELS & AND Le KILL CALSE 149. BLaN 
LT! EEN THE ER AN THE PRINTED REFERENCE. IRE. "BEFORE 
TESTING SPRINTED TELLING unite 


Ci LINE US 
PRINTED eit THE CORRECT Sate Mi sp atik LINES FROM THE" LAST "BRINTED 
LINE TQ THAT UPON COMPLE OF THIS TEST THE DIAGNOSTIC WILL 
RESTART THE PRINTING TESTS WITH E31 é. 
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— DILPKE.PLI 
a) 
275 7.3 SCOPE DRIVE ROUTINE 
“Ei THE PRUPOSE OF THIS TEST SEQUENCE IS TO PROVIDE THE OPERATOR WITH & 
752 SHORT EHENSIVE SCOPE ORIVER ROUTINE FOR USE IN TROUSL 
763 SHOOTING ne PRINTER B FYTERF ACE CONTROL MOLE WITH THE SCOPE. 
755 DEFENCING THE SETTING OF SWITCH THIS TEST WILL EITHER 
73s CONTINUE NAL No ThaTErER CHARACT R Is 5 SET iy THe SHIT SESTSTER. 9 
j w auil VU 
= Sch 11 gett ON "Fy Secrion Ss. S.1 
7289 TO INSERT A LINE FEED CHARACTER AFTER EVERY 132 CHARACTERS, WHEN 
756 SENDING CHARACTERS CONTINUOUSLY, START AT LOCATION 700(@). 
7. TO LEAVE OUT THE LINE FEED. START AT LOCATION 710(8). THIS ROUTINE 
ras ecole e be se Tee aE encOTINE THE SAVFUL : 
75 WHEN SUITCH 11 IS UP, TO SEND ONLY ONE CHARACTER THEN DEPRESS 
7SE CONTINUE TO SEND THE NEXT CHARACTER AFTER SETTING THE tthe Reais TER 
757 AS DESIRED. 70 RESUME SENDING CONTINUOUS CHARACTERS, Lace SHI TCA I} 
792 DOWN THE SHI TCHS AND DEPRESS CONTINUE. STOP SENDING 
oe CONTINUOUSLY PLACE Sw! 1 UP. 
201 ENOR 


co 
4 
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| DZLPKE.P1! 

803 TITLE MAINOEC-11-O2LPK-E-0 
eo “COPYRIGHT (C) 1975.1974 DIGITAL EQUIPMENT CORP., MAYNARD, MASS. 
3 ;eeeeee — LPLIVLPOS LINE PRINTER TEST see 

es + AUTHOR: ROBERT BAKER 

Eta 

ei LIST OF SWITCH SETTINGS USED IN THIS TEST 

sé 

e:3 ;SWITCH No. DESCRIPTION 

sis : 1s ON ERROR IN TEST 1 ONLY !2! 

Eis : 14 SEPT onaL DAVFU AVATLABLE 

i : t3 “DOWN” by. CHAR. ““UP*-S6 CHAR OPTION 
E75 : tI SEND ONLY HAR TO LINE PRINTER IN SCOPE TEST - THEN HALT 
ee0 : 0 USED Td. TEST PRINT SPEED IN TEST 1 IF NO CLOCK IS AVAILABLE 
522 999000 RO=%0 | 

523 699001 Fie] 

534 605002 = 

ES 000003 Ra=% 

£26 000004 Re=.4 

S27 500605 RS=". 

526 60000 RE="E 

S23 000007 R7=u7 

£30 So=ké 

Bs 000007 PC=R? 
833 100000 BITIS =100000 
E35 049006 i113 =4 
a ge aE 

235 ZAUERE TT]  =4900 

53¢e 852900 21710 =£008 
B36 661000 ei! =] 

5c 600409 i78 =400 
54! 650200 ett 2206 
End 000100 BIT =100 

843 rees7: 17S =4C 

90062 Ts =20 

ae 60016 {720s =! 

ee 650004 eiTp sd 

Es 900002 Git: =2 

Eng 00000! Bi700S se] 

Eee aes 

BE; ENCE AMA 

2 

ge 

BES 000000 =0 

Béc 

ec - 3 wt 

Ee5 Seraes Sento inet 


ese 000004 OO0006 _ 


GOe 
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~11-DILPK-E- 


NOEC 


~ > 
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Ee 


oe to 
CEE 
tatters ts 


— 


on BYALA EY F PRN TR 
ane 


Wd ek kd nd ed rd od od Od od ed Od Od ed Og Od od mt 


SiRSt St HStetnnisieteicietetniniris ST EnEIELE 


See eRe Ree RE acto aatatast 


| Hoe 
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TLPKE.PLL 


| o ‘ 
| 915 900166 00 HALT 
«HE Berd pours +e 
| 917 000172 00 HALT 
/ 918 900174 176 +2 
$19 000176 4aLT 
|S Bee Be ia 
- 
| gb 206 .+2 
| $23 900206 900000 HALT 
| $84 900619 O00ele +2 
| $25 000812 900000 HALT 
$26 000614 000216 +2 
827 000216 000000 HALT 
322 po0ce) Soteee +2 
$25 000222 000000 HALT 
$30 00854 000226 +2 
$21 900226 000000 HALT 
$32 000230 32 +2 
$33 000232 00 HALT 
$34 000224 900236 .+2 
335 Bote 3s 00 HALT 
$36 000640 d00e42 +2 
937 Od00S4e T 
$38 000644 +8 
839 900246 000000 HALT 
940 900250 90026e +2 
$41 000252 000000 HALT 
S42 000254 000256 2 
$43 000256 900000 HALT 
M4 o0det2 +2 
HS 000000 HALT 
a7 Qocsee OooonD tact 
de Soe78 Ghbere is: 
$48 000272 HeLT 
7 
ae HALT 
%e2 0003 .+2 
953 000302 000000 HALT 
864 000304 000306 .+2 
so 8 900000 HALT 
+ 
Bel Bok fact 
88 000214 000316 + 
865 000216 HALT 
960 000320 000322 +2 
%1 000322 HALT 
92 000224 900326 +2 
93 000226 900 HALT : 
964 900330 900332 +2 
$5 000332 HALT 
36 000354 00225 +2 
$7 0003 0000 HALT 
$8 000340 00034 +2 
| $9 000342 0 HALT 
| 970 000346 “E 





—- oo 


102 
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$71 go0ae po0000 HALT 
é e 
973 000362 posebs HALT 

§74 00364 5 is 

875 000368 0000 WALT 

ase SOOSE BORE +2 
ies bee oi 

$76 900 600006 HALT 

689 000270 OoDz72 + 

Fo “is 

323 00057 P55805 HALT 

S64 

ges 

$8 000030 =30 

888 990030 010046 TYP 

$28 S00032 DOCH 340 

220 

gq3 poo042 242 

895 

$84 000% 000000 0 

$36 O00046 246 

$$° onooNe 007675 Logte CAL 

3 oo00se2 Sia BrT14 

1001 

1002 900100 2100 

135 ooor00 gozee4 LKSRY SLINE CLOCK SERVICE ROUTINE 
gos OoOiGe Soosd 542 

1D0? 900104 oDz6 SONVRT 

ie 600106 00340 340 

PS 

- . 174 2174 

tet? ooory BOSE SISPREG: 0 

1012 000176 Oo0000 WREG: 0 
pia po0200 =200 

101s 

101 91900 Mov «#1000, “6 
ISIE poneno pier poipoe a: 
Bie 

iE 900300 =300 

1582 i START FOR pavEY_ TESTS 
q f j { 

i ae ee pet IP Te cece 
| 1 424 IME aVFU 
tee popatg Beata? ite IMp ay th ENEC LER fest eS 





_ ee ee ee + 
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Pr at ped 
1028 000400 240 

131 ppo4e0 900137 902244 IMP SWTIME iSTaRT FOR USI" eHiTON Reo FOR TIMING 
1633 00404 O00137 Od0ess0 TMP KWLIL taTRRT Ee KRI ToL Cone ct ek 
1034 OOO4i0 000137 OOes06 Imp KWIIP START FOR Kk kill “5 tie CLOCK 
ae 600414 600137 003034 Mp SLEWCK CHECK TOP OF FORM SWITCH 

1038 

1533 Sot . 2600 

} 10990 MOV 81009, x6 sSTART OF PRINTING TESTS SEQUENCE 
1Baz BRDRS BherO Bote Mee «|RSS ret 

1043 900610 000137 MP TESTS ‘TEST 3 

1 14 000137 fO04650 IMP CHRCHK ‘TEST 4 

1045 000620 900157 905114 Me OVRPRT *TEST S 

1046 600624 000137 3 J PRICTL : TEST & 

1947 000630 000137 OOseSsE IMP ‘TEST 7 

Dag 000634 p00127 c4 TMP HSPRT :TEST 8 

1048 O0064¢ O00] 06360 mp SNGCHR ‘TEST § 

1050 D005 44 900137 £528 ine ROTATE TEST 19 

ies sent Bpete> | Ba584 IMP HAMALN tee} +4 

132E 

{Dee ew = 

105? 00700 012737 O14Sb2 O14606 MoV BLSCA,LOSCOP SEND LF AFTER 132 CHARS 

ise Be BAS a> Bt tSEE IMP SCOPE 7 

105 

ipEC 000720 2720 

1 000720 0127327 OL4Y4SE 014606 MOV BSCOPE, LOSCOP F N SCOPE ROUTINE 
oes RBSrse SESE? Siuuee IMP SCOPE NS Eee ER Tine : 
1065 

i3ee 001000 =1000 

1088 LINE PRINTER HARDWARE REGISTERS 

1070 001000 177514 LPS: 177514 -STATUS REGISTER 

l BIT IS=ERROR 

l BIT P=READY 

i073 BIT GsINTERRUPT ENABLE 

1075 001002 177516 LPB: 177516 :DATA BUFFER BORG: 

157 “ BITS pues Bc CHARACTER BUFFER 
1577 ‘BITS 7- Feentt U 

1978 

ioe 901004 177570 SUR 177570 

pes vw } w : 

106] O01006 177570 SISPLAY:177570 

1082 001016 177776 PS: = «1: 77776 


pm ee 
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| 1083 901012 177566 TPE: 177566 
| Hee Baie irees es 
é H 

| 1086 35528 177560 TKS: 177560 
1087 001022 i7es4e CSBR: 72542 
1088 001024 172540 PLKS: 172540 
108 001026 177546 LKS: 75 
1080 901030 000200 PTRVEC: .WORD 200 
1091 001032 O0020¢2 PTRPSW: .WORD 202 
10S2 000245 NOP =240 
1093 000000 N = 
1094 M =2 

1095 

| 22 :MACRO FOR SETTING UP ERROR COUNT 

| 16 LIST ME 

| 0 


;MACRO FOR PRINTING TEST NUMBER AT START OF TEST 
-LIST ME 


;MACRO FOR WAITING FOR PRINTER TO PRINT OR SLEW 
-LIST ME 


;MEMORY LOCATIONS USED AS PROGRAM FLAGS AND COUNTERS 


(OPO COCO VOUT -E Cone DtO Gru E Gane eaapee see 





0+ +8 & 2 © + © + B+ & <8 2 B= & 2 8-2 2b 2 0-2 2 8 8 = + 2 2 2 + oh om +o 2 0 0 ee 
0 -* 0+ + b= & 8+ & + B82 B20 2 bo 2 0 8 = 0 he 0 eh 


001034 000 SEGCNT: QO 
001036 0000 CHRCNT: OQ 
001040 000000 CHRGEN: 0 
i 00104e LINCNT: QO 
e4 wept CYCCNT: O 
& DO 1046 WORK: 0 \ 
001050 SAVE: 0 
e? 00105Se ERCOUNT: 0 
28 001054 STRCHR: 0 
3 athe STRONT: QO 
4 LEGCHR: 0 
33 00106e NUMCHR: Q 
= sROUTINE TO TEST THE MECH. OPERATION OF THE LPOS 
2 atte 010030 SETUP: JSR 44, TYPINT 
001 RESET ;CLEAR WORLD 
37 001072 Q1374%6 9000004 MOV 4,-(SP) ;SAVE CURRENT VECTORS 
3€ 001076 013746 000006 MOV 6,-(SP) ; 





02 
| MBINDEC-11-D2LPK-E-D MACYLL 27(732) 27-SEP-76 10:57 PAGE 60 
| OZLPKE.P11 
737 j 9 MOV #1$,4 -SET UP TIMEOUT VECTOR 
| ite Batité RAE >? 794335 eee rey #8, -TRY TO ACCESS HARDWARE SW 
| tise Biiie 000407 in EF 2$ :IF THERE, GO TO 2$ 
777 7% oOO1004 ~*~ MOV aSWREG, SWR sPOINT TO SOFTWARE SWR 
iss. potas pigeee Spot es 001006 MOV #02 SPREG DISPLAY iEQINT 70 SOF THARE DISPLAY 
poe 0011 CMP P)+, (SP)4 BES! 3 $786 
«EER BBLS BFSEES  ponnny 2: Mov B34 ESTO IREGUT VECTORS 
| 1147 001140 012637 000006 ney (Pe, a 
| i958 Bete afspee Rest twe DIAGNOSTIC TITLE 
1180 001150 194000 EMT + 
15] ? :TYPE RESTART ADDRESS INFO 
| Heb peiiee 92078) ery +0 {TYPE MESSAGE 
| es saretaa Mee :DEPRESS CONTINUE WHEN READY TO START TEST 
ow 
: p TEST FOR ERROR 
1138 eset res shine sui: Ber aes O ERROR TEST FOR READY 
1158 061170 oie737 oo0c00 901052 ERRO: HOV #0, ERCOUNT " <° ;SET UP ERROR COUNT O 
ties 001 37 910244 JSR “5, STRER : REPORT ERROR BET SET 
| Her Bbi288 Bode BR ste]. ;G0 TEST F 
1162 001204 105777 177570 STPe: STB aLPs TEST FOR REA 
| aS agtsie pier 00000: o010S2 ERRI: HOV #1, ERCOUNT ert UP ERROR COUNT i 
0045 S “5, STAER : REPORT READY NOT SET 
HBS Beiees Shose5 OLOEHY : BF 2343 7° ie, TEST FOR, REROY 
1 ° + 
ties betes aera oe Arey ° PRINTER OK "READY SET" TRY TORN PAPER SWITCH 
| ize pie aac oe HALT DEPRESS CONTINUE WHEN READY 
7 : 
: 1775 MOV #14, 9LP8 :SEND Q "FF" TO THE PRINTER, 
1158 petess Bieter pootte i eeess Noy sete SPE SASTEMPT “FF™ BY SENDING 
1174 001250 005777 177524 TST aLPs :TEST FOR ERROR 
1175 901254 100406 BM] STPS :BRANCH IF ERROR SET rigs 
1176 00125¢ 012737 poo0c2 o010S2 ERRe: HOW #2, ERCOUNT ;SET UP ERROR COUNT 
115g 001264 Bpaese 010244 JSR “5, STRER sREPORT ERROR NOT SET 
| 1178 061270 000761 BR sTP4 sLOLP ON ER ROR 
ti8 { Se P08 ore MESE ERROR MEPPASE OK - TURN ON LINE 
118 001276 600000 HALT :WAIT FOR OPERATOR 
: TST PS : TEST FOR ERROR 
tide Betaoq Shana, 377478 STPSR: LOS Tpee ES ERROR CONTINUE 
118 001306 012737 o00003 O010S2 ERR3: HOV #2, ERCOUNT ;SET UP ERROR COUNT 3 
i166 01214 eee 7? 010244 JSR “5, STRER sREPORT ERROR SET 
1188 001320 600767 oF STPSA :LO0° ON ERROR 
1190 901322 106777 177452 STPSB: STB LPS i eer READY 
116] 601326 400406 BMI STPSC :READY SET OK ng: 
11g 601330 e737 000004 o010S2 ERR: HOV 34, ERCOUNT ;SET UP ERROR COUN 
1195 001336 Roose o10e44 JSR 45, STAER sREPORT ERROR NOT SET 2 ee 





ok 


OZLPKE .P 


- 
& 
- 
nu 


000767 
001344 104000 


(Uo 0 +0 9 
ePritnstig 


001352 005777 177422 
12737 040008 
366 010244 


Sis 
s) 
8 
+ 
g 


1204 


| 
| 
| 


109006 
l4le Tet 000006 


001420 aetseh 010244 
001424 000766 


5 
a 
5 
3 
: 
: 001404 6053 177370 
& 
Q 
6 
1 
1426 
| 1286 001430 105777 177344 
226 601436 012737 ooco07 
1230 O01444 004527 010244 


| 22835 001452 005037 001046 
1e36 OO14S6 O1e777 000015 
lez? 001464 eee 177310 
le39 001472 012737 000010 


le4i 001500 004537 O10244 
0762 


1242 001504 

te43 901506 005777 177266 
1e44 DCiSle 100006 

le4S5 001514 012737 000011 
le4s ent 

le47 001522 c 010244 
le48 0015e6 000781 

1e49 001530 105777 177244 
leSO 001534 100411 


MAINDEC@11-O2LPK-E-D MACY1L 27(732) 


0010Se 


001052 
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177316 


001052 


001052 
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BR STPSE : LOOP ON ERROR 
ihe. aa y TYPE 2 0 RY DRUM GATE SWITCH 
K ‘ UM G Te 
ie FED ote ce Nhe sey 
STPE: TST SLPS TEST FOR ERROR 
BMI STP7 BRANCH IF ERROR SET 
ERRS: HOW #s, ERCOUNT ;SET UP ERROR COUNT S 
JSR “5, STAER ;REPORT ERROR NOT SET 
cht STPE -LOOP ON ERROR 
STP7; EMT +0 : TYPE MESSAGE 
MESE ‘ERROR SET OK - TURN ON LINE 
HALT TSEPRESS CONTINUE WHEN READY 


;TEST 1 
;PERFORMS PRELIMINARY COMMAND AND REGISTER TESTING. 
;IS THE PRINTER FREE OF ERRORS 


TEST1: RESET -CLEAR THE WORLD 
TST aLPS :TS ERROR FLAG CLEAR 
BPL TESTIA “ERROR IS CLEAR OK 
ERRE: HOV #6, ERUCUNT ;SET UP ERROR COUNT & 
=N+ 
ISR “5, STRER “REPORT ERROR SET 
BR T2871 :LOOP ON ERROR 
:IS READY SET (NO ERRORS EXIST) 
TESTIA: RESET ;CLEAR THE WORLD 
TSTS  aLps :TS READY SET 
BMI TESTIB READY SET! PRINTER 
ERR?: Ov #7, . ERCOUNT SET UP EEROR COUNT 7 
JSR “5, STRER REPORT READY NOT SET 
BR TESTIA.- :LOOP ON ERROR 
:DOES LOADING THE BUFFER RESET READY 
TESTIB: CLR WORK ;CLEAR COUNTER 
MOV #iS, aLPs : LOAD CARRIAGE | RETURN INTO BUFFER 
TSTB = ALPS :IS READY CLEAR 
BPL LP} ‘READY IO CLEAR OK! 
ERR1O: Mov #10, | ERCOUNT SET UP ERROR COUNT 10 
=Ne 
%S, STAER sREPORT READY STILL SET 
BR TESTIB *LOOP ON ERROR 
LPi1: TST aLPS :IS THERE AN ERROR 
BPL LPe :NO ERROR CONTINUE 
ERR: HOV #11, | ERCOUNT :SET UP ERROR COUNT 11 
JSR 45, STAER sREPORT ERROR OCCURRED 
BR TESTIB ;LOOP ON ERROR 
LP2: TSTB LPS !IS THE PRINTER STILL BUSY 
BMI TESTIC :NO! GO TO NEXT TEST 





Peet eed et et ee ee 
etatatatatatay.+.4 
fore 


Woo 


onl 2 od 


MACYL1 27(732) 


001046 
000012 
010244 


002014 
000340 
177200 
000613 
010244 
177156 
000014 


010244 
000015 
Eig 

100 
000100 


000016 


000 
0001 


000100 


000017 


000240 
000100 


000100 


001052 


177e4e 
177236 


001052 


001052 


0010Se 


177134 
177116 


177106 


oo10s2 


177102 
177064 


177054 


901052 
177050 
177032 


177022 
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INC WORK 
BNE LPI 
ERR12: Oy $12, | ERCOUNT 
38h “S, STAER 
BR TEST 1B 





;YES! GO CHECK “alt 
SPRINTER STILL Bust 
;SET UP PERO 


;ERROR REPORT TIME OUT 
:LOOP ON ERROR 


AIT 
“Rout 12 


;CHECK INTERRUPT LEVEL OF PRINTER 


:THE PRINTER SHOULD BE AT LEVEL 
;TEST THAT THE PRINTER WILL NOT 
TESTIC: MOV #INTIC, JPTRVEC 


MOV #340 0, OP TRPSW 
ist aLP 
L abes : 
ERR13: MOV #13, ERCOUNT 
N=N+1 
JSR “S, STAER 
BR TESTIC 
LP3: TSTB  =s-_ ALPS 
BMI LP3x 
ERRI4: MOV $14, ERCOUNT 
N=N+1 
JSR %S, STAER 
ES TESTIC 
LP3xX: 
EQRiS: MOV #15, | ERCOUNT 
N=N+] 
MOV #340, IPSW 
BIS #100; aLPS 
NOP 
BIC #100, LPS 
;TEST THAT THE PRINTER WILL NOT 
EPRI6: MOV #16, | ERCOUNT 
_ N=N+1 
Hoy #300, IPSW 
BIS #100 ALPS 
NOP 
BIC #100, SLPS 


;TEST THAT THE PRINTER WILL NOT 
;PROCESSOR LEVEL 5 


ERRI7: MOV #17,  ERCOUNT 
MOV #240, JPSW 
BIS #100; aLPS 
BIC $100, aLPS 


: TEST THAT THE PRINTER WILL NOT 


4 
INTERRUPT AT LEVEL 7 
; SET ae VECTOR 


13 


ie FoR EEAoY 
ADY SET OK 
;SET UP ERROR COUNT 


:REPORT READY NOT SET 
;LOOP ON ERROR 


;SET UP ERROR COUNT 15 


s LOCKUP PROCESSOR 
;SET PRINTER INTO ENABLE 


: WAIT 
:CLEAR PRINTER INT. ENABLE 
INTERRUPT AT LEVEL & 

;SET UP ERROR COUNT IE 


;SET PROCESSOR PRIORITY LEVEL 6 
:SET PRINTER INT ENABLE 


WAI 
;CLEAR PRINTER INT. ENABLE 
INT. AT 


14 


;SET UP ERROR COUNT 17 


;SET UP PROCESSOR 70 LEVEL S 
;SET PRINTER INT ENABLE 


CLEAR INT ENABLE PRINTER OK 
INT 


;WHEN THE PROCESSOR IS AT LEVEL 4 
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ERR2O: Mov 820, ERCOUNT -SET UP ERROR COUNT 20 
= Ve 
MOV 8200, PSH ;SET PROCESSOR TC LEVE 
$35 8100, aLPs ET PRONTEE INT. ENABL © 
pic 8100, aLPS LER PRINTER INT ENAGLE 
IMP TESTID NTER OK CONTINUE 


: INTERRUPT HANDLE FOR TESTIC 
sRESTORE STACK AND REPORT ERROR 


INTIC: CMP (b)4, (6) sRESTORE STACK 
ISR “Es steer :REPORT ERROR 
IMP TesT :RE-ENTER TESTIC 
s TES THE eSILity OF OF THE PRINTER TO INTERRUPT 
[AT PRIORITY 
TESTID: tov sNTID, 2ETRVEC :SET UP INTEREUET VECTOR 
V 8340, ar RPS 21 OC K UP PR 
aLPs :1$ THERE A SRE NTEE ERROR 
Le :NO! CONTINUE 
ERR21: OV 821, | ERCOUNT :SET UP ERROR COUNT 2! 
* JSR “S, STAER REPORT PRINTER ERROR 
TESTID ;LOOP ON ERROR 
LP4:; TSTB 32s LPS :I READY SET 
BMI LPS :YES - PRINTER READY 
ERR22: Mov j 822,  ERCOUNT -SET UP ERROR COUNT 22 
sR STAER ;REPORT READY NOT SET 
2 veeti3 nT ERROR 
LPS: MOV 40, aPSW i LOoF PRTORI TY TO LEVEL 3 
eis $100" SLES ; SET _PRINTER INTERRUPT ENABLE 
ERR22: Mov #23, ERCOUNT ° :SET UP ERROR COUNT 22 
N=N¢ 
SR S STAER sREPORT ERROR 
ss ree7 15 :LOOP ON ERROR 
; INTERRUPT HANDLER FOR TESTID 
INTID: C (B)+, (B+ sRESET STACK 
BIC #100'aLPs “CLEAR INT. ENABLE FOR PRINTER 
CLR aPsi :CLEAR PROCESSOR STATUS 
MOV 12706, OPTRVEC :RESET INSTRUCTION AT 200 
MOV 81000, 9PTRPSW RESET INSTRUCTION AT 202 


; MINUTE PRINT SPEED CHECK 
F A KWIl-L OR KWII-P ARE NOT AVAILABLE, THE SR BITO IS USED 
;FOR MANUAL TIMING OF THE PRINTER. 


CLOKAY: MOV RT! :SET TRAP TO RETURN 
MOV ih Fa 
SEC 
TST aks :KWIL-L AVAILABLE? 


a - ~~ Ce ee Ce . 
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tes Sssei5 A5€03> ooo004 aR bes Reser Tee CTOR TQ HALT 
é ‘ ~ ULR 2 : : 

1365 Siee0 = SSERES is ine KWLIL USE KWLIL coe Herne 

136? 105777 176572 TSTB 9s DPLKS ;KWLI-P_AVAT ? 

1388 eae 15504 ets = SWTIME :NO ise ‘salven EG FOR TIMING 

136 900004 oLR 84 ;RESET VECTOR TO HALT 

1370 IMP KWLLP :<3E KWI1-P FOR TIMING 

1374 4 SWTIME: CLA LINCNT ;CLEAR LINE COUNT 

137 7 Ol IS “4, TYPINT 

1373 O02eeS4 005037 00004 CLR ass ;RESET TRAP VECTOR TO HALT 

1374 02260 $3000 EMT +0 TYPE MESS ‘ , : 

1375 02262 ios MESC SPRINT SPEED CHECK USING MANUAL TIMING 

1375 Obec4 Ole737 Qonode ogabee MOV 82,018 SET DUMMY ADDRESS 

is 777 ~QOOU0s 176504 1S: BIT s6{T0, aSWe : STAR 

1378 002300 O01774 Q 1$ WRIT FOR START 

i373 002302 050137 o0e4oE IMP STARO START PRINTING 

1381 

i386 :START FOR KW1I-P..... 

1385 O27. 901042 KWIIP: CLR LINCNT ;CLEAR LINE COUNT 

i3ec Bassi Soaaae last 3SR = 4 TYPINT 

1386 O0E31E 01270 00100 MOV #1500, %6 :RESET STACK 

1387 302322 013777 OOcElE 176472 MOV MINCNT gCSBR =: SET_ CLOCK COUNT 

“i gee Gee Bie ON. cua, 

i383 3 7 17 LK ; START 

1380 O0e344 Bosi27 | Eeesbe THe STARS EtpR BRINCING 

123 :START FOR KWII-L..... 

1334 002350 037 00104 KWI1L: CLR LINCNT ;CLEAR LINE COUNT 

i3ée Bessey Boaaee By ARSE JSR ss %4, FYPINT 

129 002360 012706 001000 MOV #1500, %6 RESET STACK 

1397 O02364 013737 O0261§ oO0zte0 MOV MINCNT, CNTR :SET CLOCK COUNT 

1398 002372 013737 01026 d02t22 MOV LKS DI ;STORE LKS ADDRESS 

1393 SGe400 Sler?? OOCIOD I 7E420 mov 6s 8 100, aLkS ENABLE CLOCK INTERRUPT 

. 

130 ;PRINTING ROUTINE..... 

1403 DO240E 032777 020000 176370 STARO: BIT 881713, 2SWR ;CHECK CHAR SET 

1404 902414 001007 BNE STAROA :BRANCH IF 96 

1405 006416 012737 000140 o01060 MOV 8140, LEGCHR ;LEGAL CHECK 

1406 008424 012737 000100 001062 MOV #190. NUMCHR ? CHARS 

1407 O0e432 900406 ze STAROB : CONTINUE 

1498 002434 012737 000200 O01060 STAROA: MOV #200, LEGCHR ;LEGAL CHECK 

1303 oevie 012737 000140 901062 eaten MOV #8140, NUMCHR ; SCHARS 

1411 002450 912737 00204 901036 MOV 8132. ,CHRCNT § ;SET_CHAR COUNT 

i412 O0e456 912737 003014 001054 MOV BPATTB.STRCHR INITIALIZE TABLE POINTER 

i313 Qoevbs Qie727 Gece] OOLD4Y STARA: MOV #17. ,CYCCNT :SET GROUP COUNT 

1415 052472 017737 176356 O01040 MOV JSTROHR CHRGEN ;GET CHAR FROM TABLE 

1415 902500 063737 001042 00104 DD LINCNT,CHRGEN  ;ADO_LINE COUNT 

1416 50 623737 001 O01040 18 C LEGCHR,CHRSEN  ;LEGAL CHAR? 

1417 002514 003004 BG TAR! :YES, BRANCH 

1412 O025i¢ 163737 o010e2 oC104e Sue NUMCHR,CHRGEN :NO, MAKE LEGAL 
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ct 1$ sRECHECK CHAR 
STARI: MOV CHRGEN, aLPS ‘LOAD BUFFER 
¢ CHRONT “DECREMENT CHAR COUNT 
8 ST : H IF DONE LINE 
DEC EYCENT : DECREMENT pYCcLe COUN 
BNE TARI “CONTINUE IF NOT DONE trou 
eos ge, STROH ADD age TO TABL ; POINTER 
J STARA : CONTINUE 
STARED: INC LINCNT i INCREMENT LINE COUNT 
MOV #i2,aLPe : SEND LE 
TST BS : TEST READY 
BEL 4 “WAIT FOR READY 
BIT 82170, aSuR :STOP PRINT? 
BEG CONVAT :YES, BRANCH 
IMP STARO : CONTINUE 
MINCNT: 7020 
CNTR: 0 
DIA: 2 


;NOTE -- PLACE S670 (8) IN MINCNT FOR SO HZ. LINE FREQUENCY $2! 
;LINE CLOCK SERVICE ROUTINE FOR KW1l-L 


LKSRV: DEC CNTR ;DECREMENT COUNTER 
BEQ CONVRT :EXIT IF 1 MINUTE 
RTI ; RETURN 


sROUNTINE TO PRINT NUMBER OF LINES PRINTED IN 1 MINUTE 


CONVRT: BIC #100, a01R jOISARLE CLOCK INTERRUPT IF CLOCK AVAILABLE 
CLR TYPDAT LEAR DIGIT ¢C 
MOV aMES12 Ae - SET SeSCAGE POINTER 
1S: CMe 8100..2INCNT § :GREATER THAN 1007 
GT 3 3NO PRINT HUNDRED’S DIGIT 
Sus 8100..LINCNT YES, SUBTRACT 
INC TYPDAtT t TRCREMENT T HUNORED’S DIGIT 
BF i$ > CONTINUE CONVERSION 
23: ADD :MAKE ASCIT 
Nove Tietet., aN ; STORE DI 
38: CMP uO. SL INCNT : GREATER 
BGT = ; 
Sua 810. LINCNT YES 
INC TYPDAT : INCRE 
BR 3$ : 
4$: ADD #60, TYPDAT : MAK 
MOVB T T,(%3)¢ sSTO 
MOV LINCNT’TYPDAT  :GET 0 
ADO 860. TYPDAT :MAKE A 
MOVE TyPOAT, (%3)4 STO 
EMT TYPE M 
MESI} : TYPE ca 


MOV BMESLIA,PRTINSG ;SET PRI 


a ee se ee + 
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Sb bb 
Oooe 
IcIcIc 
dad 


seaiataiatase: 


VETS BSERLSHPNBS ERE IS 


Rip very 
GRRE 


ie 
t 


WOO NM ULE ure Oho 


er et ee ed ed ee ee ee ed 


SESS BBSERBSES 


8 


ie 


Uh Ptah es 


Oo 
I0OIO 


Pee ee ee ee eee ee ed ee ee ed ed ed eed ed ee ed ee ee ed ee ee 


CUTONTONTOFICAT CATCATONT CAT CPTUNT ONT CCI ONT CAT CATUPT ONT ONTON 


torufororo 


Choc No 


904437 910010 ISR “4, RINT sPRINT PRINTER SPEED ON LINE SSINTES 
600137 6030 ME SuEWCK “NEXT TEST 
pooo4g PATTS: 40_ 
RExAA, A; 
6005s cs 
000134 l 
006113 113 
900072 ? 
6008s! S] 
sCHECK TOP OF FORM SWITCH 

437 0100 SLEWCK: JSR %4, TYPINT 
Rete aaa y5R “f pee iht s INITIALIZE PRINTER 
900406 BF SL “BRANCH IF OK . 
3387 ? 900024 oc1oS2 ERRE4: HOV 824,  ERCOUNT “SET UP ERROR COUNT 24 
Doves? o10244 ISR “5, STRER sREPORT PRINTER NOT READY 
3 >? 003276 OOL042 SLW: MOV SFFTAB.LINCNT LINE COUNT FOR SWITCH SETTING 
012704 603354 MOV sFFSET.%4 :INIT SWITCH SETTING TABLE POINTER 
312733 O11164 SLWO: MOV sMESS, 4.2 : INIT MESSAGE POINTER 
le7be 011277 mov = sMES10. x2 ie % < 
IiI413 SLWi: MOVB (%4), (43) :PUT SWITCH SETTINGS INTO MESSAGES 
iii4le MOVE = (4), (2) . 8 " . " 5 
122423 CMPB (“x4 4, (43) INCREMENT POINTERS 
108722 TST (42)4 
°05714 TST (x4) sDONE MOVING SWITCH SETTINGS TO MSG‘S? 
001372 SLi) "BRANCH IF NOT DONE 
005204 INC “4 !TABLE POINTER SET FOR NEXT SWITCH SETTING 
104000 EMT +0 : TYPE MESSAGE 
931130 MES? :SET TOP OF FORM SWITCH TO --- 

6000 HALT :WAIT FOR OPERATOR TO SET SWITCH 
005777 175706 SLW1l: TST QLINCNT SCHECK LINE COUNT 
003003 BNE SLWIA :BRANCH IF NOT ZERO 
012737 011477 o10026 MOV BMES1Z,PRTMSG | :CHANGE PRINTER MESSAGE 
005777 176630 SLWIA: TST aLPS :TEST FOR ERRORS 
100006 L SLWe2 BRANCH IF NO ERROR 
Sie?37 opoo2s oglos2 ERR: HOV 825,  ERCOUNT ;SET UP ERROR COUNT 25 
004537 oO10244 JSR “5, STAER :REPORT ERROR SET 
3099 HALT “HALT ON ERROR 
12777 O00014 175606 SLW2: MOV 814, OLPB : FF 
105777 175600 TSTB 3s ALPS :TEST READY 
190375 a4 swaTT FOR READY 

437 10010 S 4, RINT :PRINT MESSAGE ON LINE PRINTER 
062737 900002 o0104e ADD #2'LINCNT :NEXT LINE COUNT 

727 002252 901042 CMP sFTABE,LINCNT ;DONE TEST? 

i439 BEG DAVAY “YES, EXIT 

175612 TST aL INCNT :DONE CHECK OF THIS SWITCH SETTING? 
001721 REQ SLWO :YES, NEXT SWITCH SETTING 
37 Ollz02 o100z¢ MOV SMESS.PRTMSG | :NO, CHECK THIS SETTING 


ee 
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DILPKE.P11 
1 03240 ? 903130 Jue LWl : CONTINUE 
iE Bases Oe gos 7 011164 DAVAV: Bo FROL, nese $e] MESSAGE 
+ 
ene: 378 anes ‘cae 
1536 003260 032777 OM40000 i7SS1E IT e8IT14, ISWR :DRVFU 8 YAILAGLE? 
1537 BNE INDAT . ope aba¥e DavEU 
1 70 HALT itRe RAT HALT sare, 
153 003572 000137 OO04066 INE TEST2 > DEPRESS BONS INGE 1B START PRINTING TESTS 
i541 003276 900000 FFTAB: 0 SLOOP COUNTS FOR SLEW CHECKS 
1542 003300 18. 
1543 002302 6 
1544 903304 O00 21. 
1545 003306 900000 6 
1546 005310 O00020 24, 
1547 003312 6 
1548 19 33. 
i546 ig 5 
1550 903320 S00044 36 
1551 003322 00000 0 
:EEE 003224 dod0se2 32. 
1554 iat 48. 
i555 332 00000 0 
-EE a3 900063 si. 
1322 eater Pe. 
1559 OO0za42 00 : 
1560 002 2. 
1561 O02 0 
152 003350 000124 64. 
1563 002 000000 FIABE: 0 
tae 
156é ! FFSET: .ASCIZ /3 / sSWITCH SETTINGS FOR MESSAGES 
SA eke ge <P ee POET: Rts 12 
iEEE e336 sect 905040 ASC1Z 4 « 
tes2 Beseco BE Re me 
1571 003400 Oe0067 Od00040 “ASCI2 /? 7 
157 003404 920970 00040 “ASC! ‘& / 
Ha Se Ba Bee ee oS 
1575 GO3420 631061 Ooo040 "ASCIZ 12 / 
157¢ 003424 032061 S00040 “ASCIZ 414 7 
ié7s 
1879 LEVEN 
ige: “CHECK THAT VFU WILL NOT ACCEPT INCOMPLETE DATA 
1563 003430 004437 010030 INDAT: JSR “4, TYPINT 
1585 903434 12737 ogsees 001040 MOV sTigarT, cHRGEN SET TABLE POINTER 
1565 2 06 175332 INDO: TST LPS TEST FOR ERROR 
1ESE OCB44E 160010 BPL INDATO tBRNCH IF NO ERROR 
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158? 002450 012737 000026 OOl0S2 ERR26: MOV 826,  ERCOUNT -SET UP ERROR COUNT 26 
igs 006027 N=Ne] 

1585 o034Se OO4S37 O10e44 ISR “S, STAER :REPOR] EB ERROR SET 

1530 003462 600000 HALT RROR 

1891 003464 000137 002430 IMP INDAT RESTART FEcy 

15S 003470 pec 7 175344 175304 INDATO: MOV SCHRGEN, LPB $b Free 

15S) 503476 062737 Ood002 Gold4c ROO 82, CHRGEN 

15% 30359 005777 175330 TST JCHRGEN Hest Coa ed 

iE 2233! I a5 1752t2 = i $PNT ME 

1897 003516 100375 a <4 “WAIT FOR READY 

1§ 2s2e0 (Ol 7 O034 

12% SES25¢ a3, $2228 IND1: TST inee :TEST FOR ERROR SET. 

1600 003530 100410 MI INDATI :BRANCH IF ERROR-SET 

$2 003532 012737 000027 Oc010Se ERRe?: HOV 827, | ERCOUNT ;SET UP ERROR COUNT 27 
1602 =Ne 

1603 003540 904537 o10244 ISR “5, STAER sREPORT ERROR NOT SET 

1804 a4 Sectis HALT “HALT ON ERROR 

165s $6 137 003430 IMP INDAT RESTART TEST 

1656 O0035s2 104000 INDATL: EMT +0 : TYPE MESSAGE 

1897 003554 010315 MESA “ERROR SET OK - CLEAR & TURN ON LINE 
isds O0355¢ ‘ HALT = WAIT OPERAT 

1658 =DEPRESS CONTINUE WHEN READY FOR NEXT TEST 
1620 003S60 000137 003600 IMP NODAT :NEXT TEST 

122 003564 000356 INDATT: 356 :DATA TABLE FOR ABOVE TEST 
1613 00 900001 1 

1618 00257 2 

i615 602572 00003 3 

1616 002574 000267 357 

i617 2576 900000 0 

i633 :CHECK THAT CHANNELS WITH NO STOP BITS CAUSE ERRORS IF CHANNEL SELECTED 
ig2i 004437 010030 NODAT: JSR %4, TYPINT 

lée2 003604 012737 000200 oolosy MOV #20 TNR :SET PAPER INSTRUCTION 

1623 003612 012737 OO4006 O01040 NODOA: MOV #NODAT3, CHRGEN SET TABLE POINTER FOR LOAD 
iee4 6 005777 175154 NODO: TST aLPS :TEST FOR ERROR 

iges 108 BPL NODATO BRANCH IF NO ERRO 

1626 003626 012737 000030 O010S2 ERR30: MOV #30,  ERCOUNT SET UP ERROR COUNT 30 
i627 009031 N=N¢] 

itee 010244 JSR %5, STRER sREPORT ERROR SET 

1623 003640 HALT !HALT ON ERROR 

1630 42 scree BR NODAT RESTA 

1621 O03644 6] 175170 175130 NODATO: MOV aCHRGEN SLPB ;LORD BUFFER 

1632 003652 0627327 O00002 O01040 ADD CHR XT 

1623 OO360 022737 OO40bE 901040 CMP anbariee, CHRGEN’ -DONE LOAD? 

1624 O0366— O01405 REO ;BRANCH TF DONE 

1625 003670 105777 175104 TSTB pepe TF TEST READY 

1636 903674 100375 PPL <4 WAIT FOR READY 

1627 003676 000137 003620 IMP NODO 

1638 002702 013777 001954 175072 NODATA: MOV STRCHR, aLP2 ;SEND DATA 

1633 003710 905037 00103¢ CLR CHRCNT : DELAY 

1650 903714 2 O01036 1S: INC CHRONT 

1641 003720 001375 BNE 1$ 

le42 002722 005777 1750S2 TST LPS ;TEST FOR ERROR SET 
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| 1843 «003726 100410 BMI NODAT] :BRANCH IF ERROR SET 
| eH 003730 912737 000031 O010S2 ERR21: HOV $31, ERCOUNT ;SET UP ERROR COUNT 31 
=Ne 
l 9937 010244 ISR “5, STAER : REPORT ERROR NOT SET 
| tess ae 000137 003612 sir NODOA ict" on 
e a ‘ 
1648 903750 905237 001054 NODATI: INC STRCHR NEXT PaPER INSTRUCTION 
1650 BpSse4 022737 O00214 001054 SMP #214, STRCHR ‘DONE T 
i651 272768 1304 PEG NgDATE ; ONTINGE i NOT DONE 
1 1d40 MT + i TYPE SAGE 
1653 OO3766 010362 Nese :ERROR SET OK - CLEAR & TRY NEXT CHANNEL 
1654 eeerade 090000 HAL {WAIT FOR OPERATOR 
| 1655 200707 net a NQOOA “RELOAD 8 Test NEXT CHANNEL 
PS. 3 NODAT2: 
4g Bbarre 4 ] MESA TYEE MESSAGE OK - TURN ON LINE 
1658 990 900000 iT 
1853 oo4002 000137 oO40EE IMP TEST2 : JUMP 
 «1g61 
| 1662 OO4006 900366 NODAT3: 356 sSTART LOAD 
' 1663 904010 0000 0 
1s64 004012 9000000 0 
1665 004014 9000 
j OO4016 9000 
1867 904 000900 
1668 004022 0000 0 
1669 904024 9 
1670 004026 900000 0 
1671 004030 900000 0 
1e7¢ 32 990000 0 
1€73 034 900000 9 
1674 004036 000000 0 
1675 904040 900000 0 
1676 OO4O42 000000 a 
1677 do4044 0 
1678 00: 0 
1678 O04 000008 0 
1680 o04052 : . 
16681 O04054 900000 
1662 004056 00 0 
1662 04060 00 6 
1664 004062 900 9 
a 004064 600 NODAT4: 357 :STOP LOAD 
1687 : TEST 2 
1682 ; TESTS INTERFACE AND PRINTER par PATHS 
1688 “WITH ALTERNATING ONES AND ZERO 
1631 OCO4OBE 004427 010030 TEST2: JSR %4, TYPINT 
l6S2 004072 904537 007704 ISR “S' PRTINT s INITIALIZE PRINTER 
1692 ooo? 900406 oF T3teRK *BRANCH IF OK 
133 1 12737 000032 O010S2 ERR: OV 822, ERCOUNT :SET UP ERROR COUNT 32 
7 x=Ne 
1696 004106 O04537 oO10244 ISR “5, STAER sREPORT PRINTER NOT READY 
1637 004112 O00000 he? *HALT ON ERROR 
1632 004114 TSTZAX 
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; TEST 3 
TEST CHARACTER 


TNO? MESIS 1 TEST NUMBER FOR MESSRGE 
mas ts ie INT TEST NUMBER 
,CYCONT SET UP LINE COUNT FOR 32 LINES 

$133"  SHRENT iT Cha Co T T0132 “ 
ScHRSH; STRCHR Bare oT 
obee ‘TEST or ef 
$33,  ERCOUNT oF SINE COUNT 33 
“S, STRER SREPORT ERROR SET 

HALT ON ERROR 
ger LOAD CHAR 
SF Lecn STROHR iRESET CHAR. SWITCH 
: BLES, SAVE :STORE CHAR 

tele chee 


SCHRSW, STRCHR ae) CHAR. SWITCH TO U 
Se, SA CHER 


2 ; 
SAVE, al ;LOAD BUFFE 
CHRCAT TNC crac TER COUNT 
sp ; SEND - 
al ; TEST READY 
;WAIT_FOR READY 
#132, ,CHRCNT  }RESET CHAR COUNT 
eyctnt! SINC CYCLE COUNT 
CONTINUE IF NOT DONE 
a8; T2,3SWR —_s LOOP ON TEST? 
TEST ; LOOP 


COMPARATOR WITH ALTERNATE LINES OF 


S AND ILLEGAL CHARACTERS 


“4, TYPINT 

TNO NE SIS :SET TEST NUMBER FOR MESSAGE 

“4, PRNN ;PRINT TEST NUMBER 

#213, CYCCNT :SET 21 LINES 
: SEND tLtesar CHARS FIRST TO GIVE BLANK LINE 

rac CHRCNT ;SET CHAR COUN 132 

#40 0 CHRGE :SET FIRST 

LPs s DOES PRINTER HAVE AN ERROR 

Ete : BRAN CH IF NO ERROR 

$34, | ERCOUNT ;SET UP ERROR COUNT 34 

“5, STAER ; REPORT ERROR 
:HALT ON ERROR 

CHRGEN, aLPB ;PRINT CHARACTER 

CHRCNT HAR. COUNT 

Tepe BRANCH IF LINE IS FINISHED 

CHRGEN :NEXT CHAR 





| JQ3 


| MRINDEC-L1-D2LPK-E-D - MACYL1 27(732) 27-SEP-76 10:57 PAGE 71 
| DZLPKE.PL1 
| 4755 oos#420 g32777 020000 174356 BIT 881713, aSWR -CHECK CHAR SET 
| 2756 OO44e6 001405 BEQ T :BRANCH IF 6&4 CHARS 
1757 do4430 022737 000200 o01040 CMP 8200, CHRGEN "LEGAL CHAR? 
i758 436 OO1744 BEG T2B0A :MAKE SPACE IF ILLEGAL 
1759 OO4440 000746 9R 128) : CONTINUE F LEGAL CHAR 
| 1760 OO4442 022737 000140 001040 T2828: CMP 6140, CHRGEN LEGAL 
| 1761 OO4450 001737 BEQ T2BOA :HAKE SPACE. IF ILLEGA 
| 12ee potaeS Snes opog12 174320 TeBe Fey 412 OLPS iesue CIN “Eine EEG eg oe 
iid af | i a 
1765 SBdue chee as TSOgts TSTB ss LPS HIBS 
1765 OO446E 100375 SPL - : WAIT FOR. READY 
1756 004470 005 991946 P2H: CLR CHRGEN :FIRST ILLEGAL CHAR 
176 4474 O05 174 263: TST aLPS :TEST FOR ERROR 
| >@8 Oo¥s00 jOD008 BP. CL SCH 'ORANCH IF NO ERROR 
| i788 004502 er? g00025 o010S2 ERR: MOV 825,  ERCOUNT ;SET UP ERROR COUNT 25 
| 1771 004510 004537 o10244 JSR “4S, STAER ;REPORT ERROR SET 
177 14 HALT “HALT ON ERROR 
177 16 O12 001040 174256 LDCH: MOV CHRGEN, aLPS ; TRANSMIT CHARACTER 
| 1774 905237 001040 T2B4: INC CHRGEN X 
| 1775 004530 022737 o00012 001040 CMe #12, CHRGEN :TEST FOR LINE FEED 
| 1276 001772 SEQ ss Te KIP 
1777 004540 022737 000014 001040 CMP #14, CHRGEN Tes] Fr FOR FEED 
| 177 #6 001 BEG T2B4 KIP 
i778 004550 622737 op0015 oo01040 MP 815, CHRGEN s TEST OR CARRIAGE RETURN 
| 3780 O04556 001762 BEG KIP IF CR 
1781 OO4S60 023727 oO104O cOco4O CMP CHRGEN, #40 t CHECK IF LEGAL CHA 
1762 002753 BLT LOCH ; CONTINUE IF STILL TLLEGAL CHAR 
i783 6045 g20000 174206 BIT 881713, aSWR “CHECK CHAR SET 
1784 004576 001007 BNE T285 :BRANCH IF 96 C 
1785 OO4600 052737 000100 901040 BIS #100, CHRGEN -SET BIT 7 IF NOT SET 
1786 OO4606 032737 000200 001040 SIT #200, CHRGEN :DONE ILLEGAL CHARS? 
| 1787 OO4614 901740 BEG LOCH’ : BRANCH if NOT DONE 
1788 Doe ie e777 p00012 174156 285: Mov #12, aLP8 ISSUE LINE FEE 
1783 004624 105777 174156 TSTB alFs :TEST READY 
1780 004630 100375 BPL ;WAIT FOR REANY 
1781 04632 37 O01044 ING EYCONT INCREMENT Lie COUNT 
«4782 004636 001241 BNE T280 :CONTINUE IF NOT DO! 
1793 OO4640 O32 Q10000 174136 BIT #81712, aSWR CHECK TO LOOP ON TEST 
| i733 OO4E4E O0lz2e1 BNE TESTS LOOP 
«TSE : TEST 
| 1797 OVER PRINT TEST 
173 :OQVER PRINT FULL LINES OF ALTERNATING E’S AND SPACES 
1800 OO4€50 0044327 9010030 CHRCHK: JSR “4, TYPINT 
1801 OOM654 013737 012374 911724 MOV TNOY, MESIS :SET TEST NUMBER FOR MESSAGE 
186 poss 007760 15F ; %4, PRNNT :PRINT TEST NUMBER 
5) =M¢+ 
1809 O04666 912737 oo1o42 MOV #-24.,LINCNT | ;SET UP LINE COUNT FOR 24 LINES 
1805 O04674 012737 901044 MOV 8-2, CYCCNT : SET UP p CYCLE COUN 
1606 994702 013727 Oos044 9010s4 MOV CHRE . STRCHR : SET HAR TAG 10 SPACE 
1807 004710 012737 177574 OO1036 CR: MOV #-132. ,CHR : SET at COUN 
1e0¢ pi7is 0s 1740S CRO: ‘TST PS sTEST FO ope 
1605 004722 160006 BPL CR CONTINUE IF NO ERROR 
1810 OO4724 012737 O0003E cOlOS2 ERRZE: MOV #36, | ERCOUNT :SET UP ERROR COUNT 3¢ 
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N=Ne] 
ISR “5, STRER sREPORT ERROR SET 
eRe: HOV Sree, STRCHR ie 1 een See cH To SPACE 
MOV 105’ Save 
CR3: MOV Save aLFE SUFFER 
INC CHRON Feo BLE CHAR COUNT 
BNE CRO jis NCH IF NOT DONE 
INC CYCONT NCREMENT C COUNT 
BEG ERS RANCH IF EI NTEHED OVERPRINTS 
MOV #1 aLPB sat CR 
TSTB = ALPS Tes READY 
L 4 WAIT FOR READY 
IMP éR :OVERPR INT LINE 
CR?: MOV CHRS, STRCHR RESET CHAR SWITCH 
MOV #40, SAVE SEND SPACE 
IMP *R3 : CONTINUE 
CHRS:  CR2 
CHRE: CR? 
CRS: MOV #12, aLPB SEND LF 
TSTB ss ALPS ;T RE 
BPL -4 WAIT FOR READY 
Mov 8-2, CYCCNT RESET CYCLE COUNT 
MOV #1 3e. -CHRCNT  :RESET CHAR COUN 
INC LINCN ! INCREMENT LINE COUNT 


BNE CR3 :BRANCH IF_NOT DONE 
BIT #81712, SHR :LOOP ON TEST? 
BNE CHRCHK 


;TEST S 

s SHUTTLE POSITIONING TEST 
s BEN ‘pts AIRS OF E'S, THEN OVER PRINTS THEM WITH SPACES AND ADCS ANOTHER 
;PAIR OF E°S TO THE LINE --- THIS IS REPEATED UNTIL A FULL LINE OF E’S 
DAVE BEEN PRINTED, THEN A FULL LINE OF M’S ARE PRINTED. 


OVRPRT: JSR “4. TYPINT 
MOV TOs NESS ;SET TEST NUMBER FOR MESSAGE 
JSR 4, PRNN :PRINT TEST NUMBER 
MOV #-16.,LINCNT SET LINE COUNT FOR 16 LINES 
OVR: MOV #-132: CHRCNT SET CHAR COUN 
OVRO: MOV 8-2. CYCCNT :SET CYCLE SBNNT FOR A PaIR OF E'S 
MOV CHRCNT faci ?NO. CH BRS LEFT TO PRINT 
ADD STRCNT NO. SPACES + 
MOV 3 otibor :SEND SPACE 
BR #5, : BRANCH 
OVR4Y: MOV #105 CHRGEN :S : 
OVR1: MOV HRGEN, al ;LOR UFFER 
OVRe: TST : TEST FOR ERROR 
BPL aLRS :BRANCH IF NO ERROR 
ERR37: HOV , 937, ERCOUNT :SET UP ERROR COUNT 37 
=Ne) 
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? ? ISR “S, STAER :REPORT ERROR SET 
18) BR eg is, 
1868 005236 605337 001056 OVR3: DEC STRCNT s ECRENENT SPACE C COUNTER 
TES? Resag BR YsEL Bey | BURA be nh 4 Gt PRESSE 
1872 Oose46 005237 001036 INC CHRCNT REMENT CHAR COUNT 
1873 O052s2 001437 BEG VRS Bratch IF BONE CINE 
te 2Ser preci — BNE Svain sEONTINAE SENDING E” g IF NOT DONE 
ier pee Roa885 o00015 173812 ‘as MOV #15, aLPe 
ere STEST READY 
158 Beesog tae — BP -"y sWarT FOR READY 
| (Bei DOSSGe ae, apie pre SVR 'NO, CONTINUE OVER PRINT 
tee 005304 006237 oo104e INC LINCNT :YE$, INCREMENT LINE COUNT 
| ees 005310 o01425 BEQ OVREXT EXIT IF DONE TEST 
1884 00531 737 000001 001042 BIT #1, LINCNT SWHICH LINE NEXT? 
ges Oo8309 081707 BEQ =s(OVR ;BRANCH TO SEND E"S 
1886 005322 612737 000115 901040 MOV 11s CHEGEN :SET UP TO SEND N’S 
1887 0905330 012737 177673 001036 Hoy 4-133, CHR CNT SET agrOR COUNT 
13s Su8 3 aphaes LR CYCENT ;CLEAR CYCLE COUNT 
1890 O05346 eae 005214 MP 6 PRINT LINE OF M’S 
1891 0053S2 012777 000812 173422 OVRS: MOV $12, aLPB LF 
| $22¢ o5360 pooise a #508 173412 OVREXT att ove aswR ite ON TEST? 
1663 605364 6327 1 : 3 
1894 001250 BNE OVRPRT :LOOP 
| +1867 “ 
16S¢ OF SAME CHARACTER THEN FULL CHAR SET 
«HBS ce ULL LINE 9 THE FIRST 132 CHARACTERS RECEIVED 
| 7806 ° 
' $980] 005374 904437 010030 PRTCTL: JSR %4, TYPINT ext weet tiveat A tahesel 
aps OoeNGe Dow? Doren Ot 1S Ming Ni ;PRINT TEST NUMBER 
1904 900907 M=M+1 
MOV #60, STRCHR ;FIRST START CHAR 
tape ete Ba5999 ead Tpasee PRTO: grr seIT13, asur poi, he 
tape sete ee 177641 001034 MOV 8-95. ,SEGCNT ise OVERFLOW COUNT 
| 1398 a3 poo 177701 001034 PRT1: MOV #-6 5» SEGCNT eee OVERFLOW COUNT 
1811 SOS446 012737 177574 001036 PRT2: MOV 8-132’ CHRCNT SET CHAR COUNT 
1812 OOS4S4 013737 001054 9d01040 MOV STRCHR, KORGEN GET START CHAR 
1813 O05462e 005777 173312 PRT2: TST ILPS -TEST FOR ERROR 
1814 OOS466 100006 BPL PRTY :BRANCH IF NO ERROR 5 
1815 005470 012737 OD0040 oOD10S2 ERRYO: HOV #40, ERCOUNT :SET UP ERROR COUNT 40 
1215 005476 Boa? 010244 JSR “5, STAER sREPORT ERROR SET 
1918 O05S02. doodo0 HALT tHALT ON ERROR 
1918 O05504° 013777 o01040 173270 PRTY: MOV CHRGEN, JLPE LOAD BU FFER 
120 905512 005237 001036 INC  CHRCNT SINCREMENT CHAR COUN 
$83] OOEE1E Oo27E1 BLT PRTS BRANCH IF or 132 SARS 
“ [922 605520 001433 BEQ PRTA :START OVERFLOW 
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PKE.P1! 

1924 oOSS26 o0S237 001034 INC SEGCNT : INCREMENT OVERFLOW SOUNT 
1925 05532 901353 BNE PRT CONTINUE IF NOT DONE 
1826 005534 012777 000012 173240 MOV #i2, aLPe PSEND L 

1387 mo ae 173232 S18 aps tT oe FEC an 

+358 228 he 323 oo0049 001054 ie 840, STRCHR ‘LAST START CHAR SPACE” 
1930 OOSS56 001421 BE pert "YES. BRANCH 

1931 005560 022737 o00065 o010S4 CMP #65, STRCHR :LASt Fart CHAR 5? 

1932 OOS56— 00142 BEQ PRT? s YES BRANCH 

1933 005570 Oee73? 000071 001054 cM 871, STRCHR : DONE? 

1934 605576 o01423 BEG PRTB : YES 

1935 O0S600 z 90105 INC STRCHR "NO, GET NEXT START CHAR 
1936 090137 90s4e0 PRTO scone 

1937 905610 er O41 OO104D PRTA: MOV CHRGEN T FIRST HER IN SET 
19238 05616 1 54 ART 0 

1939 COS652 012737 OOOOGE OO10S4 PRTG: MOV #66. STRCHR pie STAR Chon TO 6 
1940 630 000137 poses IMP PRTG sCONT NUE 

194] 12737 CO1OS4 PRT7: MOV #0 STRCHR T START CHAR TO SPACE 
1942 O05642 900137 905420 iat NT 

1943 005646 032777 010000 173130 PRTS: BIT REIT 2, aSWR :CHECK LOOP ON TEST 

1944 605654 001247 8 PRICTL :LOOP 

is4s 

1S4é TEST 2 

1947 ULTIPLE LINE ADVANCE TEST 

ise i TEeTS MULTIPLE INE ROVANCES ND Tin 

138 ?PRINTS THE NUM LINES SKIPPED ON THE LINE PRINTER 
tee cree RE 510030 011724 sci is THOZ PRIS T TEST NUMBER FOR MESSAGE 
t2eg BREPSE pistes 245205 TR iF INT TEST NUMBER 
1954 000010 M=M+1 

1955 005674 ers? oggoet o10s4 MOV #TABSTR, STRCHR cig 

1956 bos? 1g? 7 177574 O01036 MLFA: ‘MOv #-132. ,CHRCNT i i cH BAR OUNT 

196? 005710 117737 172140 Oo1046 MVS as Tec, BREEN 

195@ 005716 9014Se BEG SBE ANGH T DONE 

1958 005720 005777 173054 MLFO: TST Spe sTEST FOR hea 

1966 60724 100006 BPL MLF1 : CONT F NO ERRO 

131 005726 012732 p00041 oo10S2 ERR: Ky #41, | ERCOUNT SET UP ERe OR COUNT 41 
1963 005734 004537 o10244 JSR “5, STAER REPORT novel 

1964 605740 900000 HALT :HALT ON ERROR 

1965 742 013777 OO1040 173022 MLF1: MOV CHRGEN, dLPB :LOAD BUFFER 

ise 005750 po5e37 001036 NC CHRCNT INCREMENT CHAR COUNT 
1967 905754 001361 LFO : CONTINU 

ise 756 117737 172072 oo104e2 MOVE SE TRCHR, LINCNT ;GET ASCII LINE COUNT 
1968 005764 042737 177770 O0104e BIC #177770, LINCNT :MAKE OCTAL 

1970 005772 905237 O01042 INC LINCNT ADD 1 

1971 006776 012777 000012 172776 MLF2: MOV une SLPS :SEND LF 

1972 105777 172770 TSTB § : TEST 

1873 O06010 100375 BPL WAIT FOR READY 

1974 006012 005337 ool1042 DEC CINCNT :DECREMENT LINE COUNT 
1975 006916 001367 BNE MEE : CONTINUE 

1976 56 005237 001054 ING OTREH :NEXT CHAR 
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zs MFA ; CONTINUE 


033062 023463 TABSTR: .ASCIZ /“272637463S4C/ 
532463 £30084 












LEVEN 
010000 172732 MLFY: BIT s81712, 2SWR ;CHECK LOOP ON TEST 
BNE MLF ; LOOP 
LEVEN 
;TEST & 
SHIGH SPEED PRINT TEST 
010030 HSPRT: JSR 9 <4, TYPINT 
011724 Noy TNO MESIS :SET TEST NUMBER FOR MESSAGE 
d i 44, I PRINT TEST NUMBES 
704 1T T13,9SWR ; CHECK CHAR SET 
syste Ng Be || ReGOA TBRANCH IF 96 CHAR SET 
900140 001060 MOV 8140, LEGCHR ;LEGAL_ CHK 
000100 001062 Mov #100; NUMCHR ; BCHARS 
; CONTINUE 


O60 HSOOR: MOV  8200,LEGCHR =: LEGAL _ CHECK 


tad #140 fall ad. 

4 S00: 840. STRCHR :SET UP FIRST LINE 

332 MOV $127. ,LINCNT  ;SET INE COUNT FOR 2 PAGES 
: NT  :SET CHAR COUNT 


HSO #-122' CHRCNT :5E UNT 
? 344 MOV 9-17. CYCCNT :SET GROUP COUNT 
001954 O40 MOV STRCHR,CHRGEN  ;STORE START CHAR 
172604 HS1: TST aLPe : TEST FOR ERROR 
SPL HS2 *BRANCH IF NO ERROR 
poco42 ooLos2 ERRYe: Hs y 842, ERCOUNT “SET UP ERROR COUNT 42 
=e 
o1o244 JSR “S, STAER :REPORT ERROR SET 
HALT “HALT ON ERROR 
001040 172560 HS2: MOV CHRGEN, aLPe :LOAD BUFFER 
001036 INC CHRONT : INCREMENT CHAR COUNT 
BEG HS4 :BRANCH IF DONE LINE 
001040 INC CHRGEN :NEXT CHAR 
INC CYCCNT “INCREMENT GROUP COUNT 
BEG 453 :BRANCH IF DONE GROUP 
001060 o01040 oME LEGCHR,CHRGEN ;LEGAL CHAR? is ele 
BNE nS ;BRANCH AND. CONTINUE IF LEGAL CHAR 
oo1d&2 OO104e Sue NUMCHR,CHRGEN  ;MAKE LEGAL 
ze HS1 : CONTINUE 
001054 OOL040 HS3: MOV STRCHR,CHRGEN ;GET FIRST CHAR IN GROUP 
177757 001044 MOV 8-17.,AYCCNT  ;RESET CYCLE COUNT 
BR HS] : CONTINUE 
000012 172474 HSH: MOV #12, aL°8 :SEND LF 
172466 TS7e) 0 aS TEST READY 
BPL x “WAIT FOR READY 
001042 DEC LINCNT ;DECREMENT LINE COUNT 
BLT HSE :EXIT TEST IF DONE 
oo0004 oc1os4 Sue #4, STRCHR -SKIP 4 LINES ON DRUM, FIND START CHAR 


—_—_— eee —_—— -—_— ——_—_- -—_ 
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be 


MACYI1 27(732) 


000040 
000100 
010000 


g 
3 


mo ¢ 


S 
RS 
yard 


0601054 
00:;054 
172426 


172250 


BLE 0) 
ace ' STROHR 
HSE: SIT #81712, awe 
BNE repre 
:TEST § 
;WORST CASE NOISE TEST 
“SINGLE CHAR. ACROSS ALL COLS. 
sae: I 
JSR Ta Baa 
M=M+] 
= I 1713, aSWR 
MOV 8-96. ,LINCNT 
2 .41 
Se: MOV e@-64. , LINCNT 
MOV 840, CHRGEN 
see: MOV g-13¢. ,CHRCNT 
I: TST aL 
BPL xS1X 
ERR43: MOV #43, ERCOUNT 
N=N¢1 
ISR “5, STRER 
HALT 
XS1X: MOV CHRGEN, ALPS 
INC EHRCNT 
BNE l 
S4x2: MOV #12, aLP8 
TSTB aLPs 
BPL - 
INC CHRGEN 
INC LINCNT 
BLT Sea 
BEQ suxe 
LPS?: BIT 861712, aSWR 
BNE SNGCHR 


sTEST 10 

:DRUM PATTERN CHARACTER TEST 

ROTATE: JSR “4, TYPINT 
MOV TNOL2,MESIS 

ISR “4, PRANT 


861713, dSWR 
OT 


BNE R 

MOV #137,LINCNT 
MOV #140, LEGCHR 
MOV 8100, NUMCHR 
BR ROT] 


;START CHAR A LEGAL CHAR” 
:CONTINUE IF LEGAL START CHAR 
MAKE LEG CONT INUE 


3 CO! I! 
sLOOP ON TEST? 
;LOOP 


;SET TEST NUMBER FOR ! 
;PRINT TEST NUMBER 


364 CHAR. 

SET UP SPACE 

Fel CHAR COUNT FOR 132 

TEST FOR ERRORS 

sBRANCH IF NO ERRORS . is 
:SET UP ERROR COUNT 43 

sREPORT ERROR 

;HALT ON ERR 

;LOAD PRINTER SUFFER 

s INCREMENT CHAR COUNT 

ONTINUE IF NOT DONE LINE 
NE FEED 


;SET TEST NUMBER FOR MESSAGE 


;PRINT TEST NUMBER 


;TEST CHAR SE 
; SKIP if 96 CHAR 
= HAR 
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D2LPKE. 
ges 006610 912737 900177 001042 ROTO: MOV 8177, LINCNT LAST CHAR 
Ree fee Bee Rie By tape eee 
(8, i3i ‘ 
0 Bobs ROT : CLR cVcCAT CLEAR CYCLE COUNT 
Sha; Gheens foesse Bbioad IN BREEN sal Eok bE tee 
ee Sbeess ae bac 1054 shy HOV xHRCEN STRCHR Ec ee POINTER 
a3. Seeee en 1535 i524 ADD LINCNT,STRCHR  ;FINO CHAR 
ose O0666& 0237 1054 901060 CMP STRCHR;LEGCHR ©; LEGAL? 
2098 74 Soes3 BLT OTS ;BRANCH_IF LEGAL 
2100 7 le 001062 001054 Sug NUMCHR,STRCHR =; LEGAL 
€:03 006704 005777 172070 ROT4: TST aLPS ;TEST FOR ERRORS 
ae 71 e208 BPL ROTS BRANCH IF_NO ERRORS 
g:23 006712 O1e737 OO0044 001052 ERRY: HOV 844,  ERCOUNT SET UP ERROR COUNT 44 
ed p00045 =Ne 
€i05 067 010244 ISR “5, STAER ;REPORT ERROR 
2106 006724 HALT HALT ON ERROR 
2157 0067 ] 001054 172046 ROTS: MOV STRCHR, aL PB ;LOAD BUFFER 
2:08 0067 sve? 001040 600021 CMP CHRGEN, #17. ;DONE_GROUP? 
2:03 06742 Bo1z4i BNE ROT3 :NO GET NEXT CHAR 
2119 O0&744 023727 oo1044 00010 CMP CYCCNT, #8. :DONE LINE? 
Siig Soeve4 0127? oggoue 172020 ROY sles LPB ives, “een LF 
315 RoE72 105777 [3813 TST8 SiBa TEST READY 
2:14 S067 100375 BPL 74 ;WAIT FOR READY 
2:18 006770 005337 o01042 DEC LINCNT :DECREMENT LINE COUNT 
138 774 023727 001042 000037 CMP EINENT, 437 : DONE? 
eil soe 2313 BGT OT! NO, NEXT LINE 
21i8 007004 032777 010000 171772 BIT 861712, ISWR ;LOOP ON TEST? 
g:13 067012 Oo01251 BNE ROTATE’ ;LOOP 
ele] ;TEST 11 ----- SPURIOUS HAMMER FIRING TEST 
sics ;LEFT AND RIGHT TRIANGLES 
ele 
gies ; STARTING WITH A LEFT TRIANGLE 
eie6 007014 004437 010030 LFTTR: JSR “4, TYPINT 
ele? 007020 913737 Ole4le 011724 MOV TNO13, MESIS ;SET TEST NUMBER FOR MESSAGE 
gice 007026 Oo4i3/ 007760 IR x4, PRINT ;PRINT TEST NUMBER 
2130 007022 012737 000204 001042 LFT: MOV 8132.,LINCNT SET LINE COUNT 
2131 007040 013737 001042 001036 LFTO: MOV LINCNT,CHRCNT  ;STORE CHAR COUNT 
giz 7046 e737 age 001044 MOV #-17. CYCCNT ipET GROUP COUNT 
13 os4 1 1036 001040 MOV CHRCNT,CHRGEN ;FIND FIRST CHAR ON LINE... 
giz 97 oe 022737 000022 OO1040 LFT1: CMP #18. , CHRGEN ;MORE THAN 17 CHARS? 
135 007070 003004 BGT LFT2 ;BRANCH IF LESS THAN 17 
2126 007072 162737 000021 001040 SUB #17. , CHRGEN ;SUBTRACT 17, IF > 17 
2137 3071 990779 ie FTI : CONTINUE 
e138 1 437 001040 LFT2: NEG HRGEN NEGATE 
2139 007106 062737 000100 901040 ADD #100, CHRGEN START CHAR IN CHRGEN 
140 007114 012737 001040 001054 MOV CHRGEN,STRCHR  ;STORE STARTING CHAR 
iH) oor tee 171652 LFT3: TST ALPS ;TEST FOR ERROR 
214 1e6 100006 BPL LFT4 ;CONTINUE IF NO ERROR 
2142 007130 012737 OOO04S OO10S2 ERRYS: MOV 84S,  ERCOUNT ;SET UP ERROR COUNT 45 
2145 dod0% N=N+1 


a a ee ee ee + 


E04 
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| OZLPKE.P12 
| BISS 0071396 OO4S37 O10244 JSR “S, STRER ;REPORT ERROR SET 
BS EES G28 cicg em um FY anmeyare he Seber 
| ee ciBe Bg: Bee eteen ‘EOE RENT CHAR COUNT 
ORES DESHER 506255 oorovs Ne OEYCENT PENCRENENT GROGP”ZOUNT 
| 2153 907165 cite ae Cres BRANCH IF DONE GROUP 
ae sorigs 001040 ine CHRGEN sNExT CHAR IN GRO 
i ese yf as ‘ . : 
| HED BESLS BYSSS? oorosy coro Lets: ov STROHR, CHRGEN ETE YERT CHAR AGAIN 
| 2185 007202 Ole737 177787 001044 MOV a=17. ,CYCCNT RESET GB GROUP COUNT 
«ta Soret 744 cS LFT3 
| 2157? O07é12 012777 oo0012 171562 LFTé: MOV 812, 0LP2 ; SEND ie 
| £158 O07220 105777 171584 TSTB. = ALS :TEST READY 
£158 007224 150375 BEL 4 :WAIT FOR REGDY 
2160 07226 005337 oo1o4e DEC LINCNT ;DECREMENT LINE COUNT 
| £161] 007232 003302 BGT LFTO BRANCH IF no? DONE 
«E162 «DO7EM = OO17EE BEQ ss LTE ; SENG BLANK LINE AT END OF TEST 
| 2163 007236 032777 010000 171540 BIT 881712, aSWR :LO0P ON TEST? 
| gts Ooress So le63 BNE LFTTR ; LOOP 
es 
E166 ;TEST_11 ----- CONTINUED 
e167 RIGHT: +RIANGLE 
2168 DO7E46 0127 . O01042 RTTR: MOV #1,LINCNT sINITIALIZE LINE 
«SE BebgeS gTESES GRRROS BRINE Bris’ Nov Peet cnae fe"a > 
ei7i Dorese Ota7s? OGioNe o01544 HOV LINGNT.CYCONT SAVE. NO. CHARS ON LINE 
ei7e O07e70 012737 17775 951056 MOV a-12.,518 TRONT  ;SET GROUP COUNT 
2i7s 007276 012737 O00204 501036 MOV CHRONT. NO. CHARS PER LINE 
2174 007304 163737 001042 001036 Sus Pei, CHRCONT  ;SUBTRACT NO.. OF CHARS ON LINE 
ert Oorsle Scises BEQ RT3 ;BRANCH IF NO SPACES ON THIS LINE 
2176 007314 171460 RT2: TST aLPs TEST F 0 
2177 007320 100006 BPL RT2R ;CONTINUE IF NO ERROR 
2178 007 Bie737 OO0O4E OOLOSE ERRME: NOY 846, ERCOUNT ;SET UP ERROR COUNT 46 
el 009047 =N+ 
2180 007320 904527 oc10e44 JSR “5, STRER ;REPORT ERROR SET 
2181 907334 900000 HALT HALT ON ERROR 
2182 007336 012777 OO004O 171436 RT2A: MOV 840, 2LPB LOAD BUFFER 
2183 907344 005237 Odldse INC STRENT : INCREMENT GROUP COUNT 
Stes Ser3e> E1257 irr7s7 ooiose eM cnet eet coe 
218s 8-17. ; 
2186 Bp3e5 Boesar doi036 RT2AA: DEC CHRCNT ;DECREMENT SPACE COUNT 
Zig Gorse SOeSSF ariwoe erg: fet eect FoR ERROR 
a 73 TReabe BP. BYoR : CONTINUE FE NO ERR ROR 
e1%0 007374 012737 O00047 O01052 ERR?: HOV 847,  ERCOUNT ;SET UP ERROR COUNT 47 
. =Ne 
5 007402 Baaee? 10244 JSR “5, STRER ;REPORT ERROR SET 
2133 07406 900000 HALT ;HALT ON ERROR 
2194 007419 013777 01 40 171264 RTA: MOV CHRGEN, OLPS ;LOAD BUFFER 
2:95 OO741E 1540 INC CHRGEN sNEXT. CHAR 
213 Co7422 005237 OO10Se INC STRCNT ; INCREMENT GROUP COUN 
197 OO7426 001006 ENE RT38 BRANCH IF NOT DONE SOUP 
2198 907430 012737 177757 oo10se MOV -17.,STRCNT | ;RESET GROUP COUN 
2153 007436 162737 O00021 901040 SUB 817. ggrraen :GET FIRST GROUP tHaR 
ze0c «007444 006337 001044 RT3B: DEC cyceh :DECREMENT CHAR COUNT 
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NE 13 
MOV #l2,aLPe 
TSTB = aL PS 
site LINCNT 
Mp 8123. ,LINCNT 
BGT R 
817 881712, aSWR 
BNE RTTR 
TEST J2 
“HAMMER ALIGMENT 
HAMALN: JSR “4. TYPINT 
MOV Tyo MESIE 
ISR 
M=M+1 
MOV #-63. ,LINCNT 
HAMIX: MOV a- 132. , CHRCNT 
HAMe: TST aLPs 
SPL XHAM! 
ERRSO: MOV 850, ERCOUNT 
N=Ne] 
JSR XS, STAER 
XHAM] 
TST aLPs 
BPL 74 
BPL -4 
YHMAMILX: MOV $105, aLPe 
INC CAT 
SNE 
MOV #12, aLP8 
TSTB ss ALPS 
ae 
Nc LINCNT 
NE HAMIX 
ei! 831712, aSwR 
NE HAMALN 


HAMX: 


LOGICAL: 


DORGN: 
IMP 


;MISC. ROUTINES 


s6IT14, ISWR 
HAMX 
DAVFU 


as42,RO 
DOAGN 


PC, (RO) 


TESTe 


cont TNs 


ne - Fs oy READ 
‘a NT LINE COUNT 
‘BRANCH IF NOT DONE 
LOOP ON TEST? 
; LOOP 


‘Bet TEST NUMBER FOR MESSAGE 
;PRINT TEST NUMBER 


;SET UP FOR 63 LINES 
:SET CHAR COUNT 
:CHECK FOR ERROR 
;BRANCH IF_NO ERROR 
:SET UP ERROR COUNT SO 


heron! ERROR OCCURRED 

;HALT ON ERROR 

; TEST READY 

sWATT ai READY 

;WAIT FOR READY 

; TRANSMIT E TQ PRINTER 
HAR_COUN 


+1 C 
TRAN NSM if ANOTHER CHAR. 
fae ee FEED 


T RE 
sWAIT FOR wer 
+1 TO aaa 
GO DO NE 


:CHESK TO “i "Sn TEST 


:DAVFU AVAILABLE? 
RECYCLE PR NTING TESTS 
Nee, BR TAT NG fears 


QO DAVFU 


;RESTART 





aE 


co! 























MAINOEC@11-DZLPK-E-D 9 MACY 27.732) 27-SEP-7& 10:57 PAGE 21 
| DZLPKE.PI11 
‘22S? 
2258 
| ps9 
| 2260 
2261 
| epee sROUTINE TO INIT IBLIZE PR INTER 
eet: -ENTER FROM JSR %S, 
| ee55 907704 005777 171070 PRTINT: TST aLFs TEST FOR COROR 
| e266 007710 100403 BMI TINO :2 ANCH IF ERROR 
ecb? OO7712 105777 171062 TSTB = ALPS :TEST FOR READY 
2268 007716 100403 a ROYOK “READY SET 
| £263 007720 G€2705 ooooe PRTINO: AD #2,%5 :SET UP FOR “FeRoR REPORT 
e270 07724 000205 RTS “ue ?REPORT READY NOT SET 
re po77ee 012777 99014 171046 RDYOK: MOV #14. DLP 3158: FORM FEED 
| 7s 0077384 1 171040 TSTE = aLPS : TEST FOR READY NOT SET 
| 2273 109003 Be NTRDY :READY NOT SET OK 
ee74 OO7742 2705 ocodode ADD 82,45 :SET UP FOR REPORT 
| 2275 007748 000205 RTS “ :EXIT AND REPOR? 
| $2278 907750 NTRDY: 
ge72 105777 171024 TSTB LPS : TEST BE 
105275 BFL .=4 ; WAIT Pee READY 
2278 00775 500205 RTS “S -READY SET EXIT 
| 2280 
peel 
| peee 
BE ;ROUTINE TO OUTPUT ASCII MESSAGES ON THE LINE PRINTER 
007760 012737 O1170& O10026 PRNNT: MOV SMESI4,PRTMSG ;PRINT TEST NUMBER 
2286 007766 005777 171006 TST SLPS : TEST FOR ERROR | 
287 007772 100006 BPL RINT : H K 
ce88 007774 gie737 00005: O010S2 ERRSI: MOV 851, | ERCOUNT »SET UP ERROR COUNT 5! 
2230 910002 peoess 010244 ISR “uS, STAER ; REPORT ERROR SET 
221 010006 90900 HALT HALT ON ERROR 
22Se 010010 013737 001000 001016 RINT: MOV LPS, TES :SET \ vectors - 
2e93 010016 013737 001002 O01012 MOV LPB; TPB :TO PRINT ON LINE PRINTER 
e522 pi ooe? atk PRT ae si eee cace 
5527 ates 12508 177564 OO1016 TYPINT: MOV #177564, TPS tRESET VECTORS 
ee3? 010026 012737 177566 O010le MOV #177566, TPE :FOR TTY 
2236 010044 o00204 RTS “M4 : RETURN 
Eat ; SUBROUTINE TO OUTPUT ASCII MESSAGES ON TELETYPE PRINTER 
220e OL004E 011600 TYP: MOV 3% , 40 :GET ADOR. THAT CONTAINS MESS. 
e23 9:0080 736 oo000e2 ADD 82 og :SET UP EXIT 
Hie (ie cicso §©=—| em, ive fanistwmar fa euinserpgsone ™ 
Fe Sites ated ENg TYPC’ 361 CHARA IF NOT DONE 
j 37 COOO4S 010160 TYPC: CMPB 84S, TYPDAT :CHECK FOR "x" 
} 146 BEG TPF :BRANCH IF 
310 61 122737 000042 O10160 Meg #43, TYPDAT ;CHECK FOR “a” 
2311 010104 001417 8E9 :BRANCK IF "#” 
esi2 O10106 004737 010114 JSR xy PPD : TYPE CHARACTER IN TYPDAT 






-DZLPK-E-0 MACY11 27(732) 27-SEP-76 10:57 PAGE 82 
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000761 aR TYPA sNEXT CHAR IN MESSOGE 
113777 O10160 170670 TYPD: MOV8 = TYPDAT,aTPB [OUTPUT CHARACTER TO PRINTER 
105777 170670 TYPOO: 378 aTrs 
Te “? : CHER. 7 YPe0 EXIT 
j2737 000012 O10160 TYPF: MOVB #12, TYPDAT :QUTPU 
010114 JSR % Pe 
112737 600015 010160 TyPG: Move. #16 TYPDAT + TPUT. ns 
004737 010114 JSR “7, TYPD ;G0 TYPE CHAR 
$907 ? BF TPA 
00 TYPDAT: 


;ROUTINE TO CONVERT OCTAL TO ASCII 
;ENTER ws & AS FOLLOWS 


200000 =AODRESS OF” NUMBER TO BE CONVERTED 
:XXXXXXSADDRESS OF ASCII MESSAGE 
?XXXXXX=NUMBER OF OCTAL NO.’*S TO BE CONVERTED 
013537 o1de4e CONV: MOV a(5)+, ACNVX sADDRSS OF NO. TO BE CONVERTED 
012501 MOV (Bt, Ah ; ADDRESS OF MESSAGE 
012502 v (5)4+'% MBER OF ASCII CHARACTERS 
065201 D %2,% FIRST CHAR ADDRESS 
013703 o1024e ACVN: MOV ACKVX. %3 :STORE NUMBER 
042703 177770 BIC 8177770, %3 : ISOLATE LEAST SIGNIFICANT BIT 
062703 o00060 ADD #60, %3 :SET UP AScil CHARACTER 
110341 MOVB %3,-(1) :STORE CHAR 
000241 CLC :GET NEXT ST ENTFICANT BIT. 
006037 o1024e ROR ACNYX 
000241 cLe 
006037 o1024e2 ROR ACNYX 
000241 cL 
006037 o10e4e2 ROR ACNVX 
5202 DEC %2 s-1 FROM ASCII CHAR. CNT 
1356 BNE ACYN "CONVERT NEXT CHARACTER 
060205 RTS “5 “EXIT! CONVERSION DONE 
ooo000 ACNVX: O :WORK REGISTER 
;ROUTINE TO REPORT ERROR COUNT 
7 o10162 STRER: ISR %S, CONV sCONVERT OCTAL TO ASCII 
1 ERCOUNT 
010274 HED] 
000503 3 
nee ENT +0 : TYPE ERROR MESSAGE 
170516 TS aswR s TEST FOR HALT ON ERROR 
0 SMI +4 BRANCH | iF. NO HALT WANTED 
HALT HALT RROR 
RT “§ RETURN 


C2e004O O2004O OS1105 HED!: .ASCIZ / ERROR COUNT%/ 
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105 051122 051117 MESA ASCE ERROR SET OK - CLEAR & TURN ON LINE“: 
051105 O47622 O20122 MESB ,ASCIZ /ERROR SET OK - CLEAR AND TRY NEXT CHANNEL%/ 
120 osiee OS2116 MESC “ASCII /PRINT SPEED CHECK USING MANUAL TIMING?/ 
leo OS2ie5 O5144 “ASCII /PUT SWITCH O UP TO START TIMING%/ 
120 052125 051440 -ASCLZ /PUT SWITCH O DOWN AT END OF 1 MINUTEX/ 
123 4 052122 MESDD: .ASCIZ /STARTING DAVFU PRINTING TESTSx/ 
o4s045 030120 O20065 MES ASCIZ /“LPOS LINE PRINTER TEST%/ 
nurbS 994285 E2052 ees: GEES 7Bbiicr On TuRN ON CINE, 
7 9 O116 aSue75 MESY Bests /ON LINE OK - TRY TORN BaPER SWITCH%/ 
lee Oo4osoS os4so4 MESS BScIz /READY SET OK - TRY DRUM GATE SWITCH%/ 
OS1165 O47522 O20l22 MESE ASCIZ /ERROR SET OK - TURN ON LINE%/ 
542258 HEeoa: ASCII “RE 
042523 020124 O47524 MES7 ASCII /SET TOP OF FORM SWITCH TO / 
3040 o20040 O44440 NESE ASCIZ 7 INCHES%/ 
02455 O264SS5 MESS: ASCII /------------------------------------ THIS LINE SHOULD BE / 
o49 Seeese 020046 MES IO: sree toy «gates FROM THE LAST LINE  os- ---------=-------+------------------- 
051120 047111 920124 MESI1: -ASCII /PRINT SPEED IS APPROXIMATELY / 
020040 O20040 O4604O MES1e: .ASCIZ / LINES PER MINUTEX%/ . 
Os O264sS Oes4s5 MESI3: ASCII /-------------------------------------------------- / 
O55 026455 O2e4s5 ‘ASCI] 0 /-------------------------------------------------- / 
o55 O26455 d2e4ss asciz ae #/ 
O12 o42524 052123 MESI4: ASCII <12><12>/TEST NUMBER / 
0 O0S012 od000ie NESIS: ASCIZ «7 74«12><12<12 
044124 O51S11 O4604O MESI6: .ASCIZ “THIS LINE SHCULD BE PRINTED#/ 
o4¢ 020040 920040 NESI?: "ASCIZ 7 : ALL ON ONE LINE --- IF SLEWED O LINES%/ 
O264S5 O24SS O2E4SS MESI§: ASCII /----------------------------------- THERE SHOULD BE 
040 O20040 d20040 NSIS: -ASCIZ 7 BLANK LINES BEFORE THIS LINE ##§ -------------------------------- 
oS2040 OS1S0S o44S24 MESEO: .ASCII / TESTING CHANNEL SLEWING USING CHANNEL NO. / 
pen046 900 nESOR LASCIZ 7 7 
TNDAV1: .ASCII /D1/ : TEST NUMBERS FOR DAVFU TESTS 
031104 TNDAVe: .ASCII /De/ 
031504 TNDAVS: .ASCII /D3/ 
006 TNO1: . ASCII /1 
S5E5 TNOe: .ASCII /2 
020063 TNO3: .ASCII 73 
064 TNO4: .ASCII “4 
020065 ™NOS: .ASCII “5S 
TOG: ASCII / 
O06 THO7?s .ASCIIT / 
020070 TNOLO: .ASCII /8 
020071 TNOL1: .ASCII /9 7 
1 TNOL2: ASCII /10/ 
1 TNO13: ASCII /11/ 
TNOL4: ASCII /lev 
46 TNOIS: .ASCII /13/ 
032061 TNOLE: .ASCII 7147 
TNOL7: .ASCII 715/ 
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- EVEN 
;DAVFU PRINTING TESTS IF DAVFU IS AVAILABLE -- SET SWITCH 14 


;TESTS D1 ANO De 
;CHECK DAVFU LINE COUNT SLEWING 


> BIR DAVFU: JSR “4 TYPINT ; INITIALIZE 
> BI4454 o12166 MOV spor ,MESIS+2 
EMT +0 - TYPE MESSAGE 
MESOD :STARTING DAVFU TESTS 
20 013136 MOV #220, DAVI1 :SET DAVFU INSTRUCTIONS 
Oe2el 013140 OV tool; DAVIE 
12360 011724 MOV TRA resis SET TEST. NUMBER FOR MESSAGE 
007760 ISR PRINT NUM 
013070 OO1040 DAVO: MOV SOAVTER. CHRGEN SE teare TOON EF 
166276 DavOo: TST aLPS :TEST FOR ERROR 
BPL DAVI : BRANCH if ENO ERROR 
oo0cS2 o010S2 ERRS2: MOY . #52, ERCOUNT ERROR COUNT S2 
=Ne+ 
010244 ISR “5, STAER s REPORT ERROR SET 
HALT :HALT ON ERROR 
012470 IMP DAVO RESTART Test 
166310 166250 DAVI: MOV OCHRGEN, SLPE LOAD DAV 
oo00d2 001040 ADD HRGEN : INCRE NT U TABLE POINTER 
166274 TST Hapa :TEST IF DONE LOAD 
BEG Ds “CONTINUE IF DONE 
166226 TST8 alps TEST READY 
BPL :WAIT FOR READY 
012476 IMP bay vOo 
ooo002 O01044 ODS: MOV #2, CYCCN :SET CYCLE COUN 
011732 0610026 00: MOV she S16 BRTMSG ;SET MESSAGE SN ORESS 
010010 ISR RINT : PRINT MES $e GE 
166174 TST abs :TEST FOR ERROR 
BPL Di ES INE F NO ERRO 
000053 o010S2 ERRS3: OV #53, ERCOUNT »SET UP ER eOR COUNT $3 
010244 ISR “5, STAER i gg ERROR SET 
013136 166152 ODI: MOV DAYI1,aLPE ; SEND DAVFU INSTRUCTION, SKIP O LINES 
166144 TSTB = ALPS ;TEST READY 
BPL 4 IT FOR READY 
011767 oO10026 MOV aES17 PRTMSG sgt PRINTER MESSAGE ADDRESS 
010010 JSR nt ;PRINT MESSA ec 
012072 910026 MOV anéerg PRTMSG T MESSAGE ADDRESS 
013140 OO1040 MOV Dave, EURGEN : FIRST 7 DAVY INSTRUCTION 
24626 tte 4 MOV NOL'STRCHR  ;SET T 
001 1036 MOV SIS; CRRCNT ‘SET THEE COUNT 
166074 be: TST aLPS :TEST FOR 
BPL 03 CONTIN F ne NQ ERROR 
000054 O010S2 ERRSY: ae #54, ERCOUNT REOES COUNT 54 
010244 ISR %4, STRER ;REPORT ERROR SET 


HALT ;HALT ON ERROR 
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013777 001040 166052 D3: MOV CHRGEN, JLPB sSEND DAVFU INSTR. 
135702 ig6044 S78 aLF 5 TEST READY 
ae it o12164 ; y aetecee, MESI9 ieee PRINTER fe SpESSAGE 
005337 001036 DEC cHACNT :DEC teeee COUNT 
001407 BEG “EXIT TEST IF DONE 
005237 001040 INC BR GEN ;NEXT DAVEU. INSTR. 
peer 37 aes 001054 605 #2, STRCHR !INC TABLE POINTER 

137 Ole? J D : CONT 
337 001 D4: DEC CYCCNT BEC CYCLE COUNT 
001415 BEQ DEXO :EXIT IF DONE 
ee7 37 900140 013126 ADD #249, DAVIL CHANGE DAVE INSTR. 
ee: seb 013140 ADD #i40'Davie :CHANGE DAVFL INSTR. 
13737 Ole 011724 MOV Thonve MESIS :3SET TEST NUNBER FOR MESSAGE 
37 007760 ISR 4, PRNNT PRINT TEST 
p09 3 01 IMP fo" :RETEST LINE "SOUR SLEWING 
1 20 013136 DEXO: MOV #220, DAVI! RESET DAVFU INSRT 
012737 000221 913140 MOV #201 Davie sRESET oprvey INSTR. 
032777 010000 165726 BIT s8IT12, aSWR 3L90 TEST? 
00! BNE 1$ 
005137 013142 IMP Dave INEXT TEST 
000137 012424 18: IMP DAVFU LOOP 
oo0356 DAVTAB: 356 :DAVFU LOAD TABLE 
2 
900003 3 
004 4 
pods : 
609007 ? 
000010 10 
099011 ll 
So05te le 
0013 13 
000014 14 
900015 is 
60001! 16 
00001 17 
p00020 20 
000357 357 
20 DAYI1: 220 
BposE? Davie: 221 
sTEST D3 
CHECK DAVFU CHANNEL SLEW COMMANDS 
pave: JSR “4 TYPINT. ; INITIALIZE 
MOV spSp MES! 


13737 014454 , 342 
2727 01e364 MOV ae RES! ;SAT TEST NUMBER FOR MESSAGE 
44 60 ISR RNAT :PRINT TEST NUMBER D2 
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ll 
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¢ wil i Sf 
a6 813516 bier37 
cies 013216 Q1e737 
82 OQl3ee4 77. 
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2488 0 
2) pi aeee pans dh 
Bug] $1356 So07e0 
24S2 Ol3e7e 012737 
2483 013300 013 
2434 Bias 105 
2495 Ol33ie 100375 
Bag? 013320 100010 
Buse G13 b12797 
2499 0000$7 
2500 013330 004537 
2501 913334 Berta 
eS0e 013336 137 
2503 Qi334e 022737 
2eS04 013350 001497 
2e50S 013352 022737 
013360 1403 
013362 S337 
013366 001344 
S$ 013370 737 
0 013376 017727 
013404 737 
013412 001327 
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MOV #MTAB, MTABP 
MOV ITAB: ITABP 
MOV arTage STRCHR 
MOV TNOL, ATABP 
MOV sICTAB. ICT 
MOV JICTABP, STRCNT 
LOAD: MOV #0TAB, OTABP 
MOV DTABP,C 
TST LPS 
BPL DL1 
ERRSS: MOV #55, | ERCOUNT 
N=N+1 
JSR “5, STAER 
HALT 
BR LOAD 
DLI: MOV #2, CHRCNT 
DL2: MOV CHAGEN, aLPB 
TSTB = ALPS 
BPL "eae 
TST DLPS 
BPL DLE 
ERRSE: MOV #56, | ERCOUNT 
N=N+] 
JSR ¥%S, STAER 
HALT 
IMP LOAD 
OL6: CMP #356, CHRGEN 
BEG L6A 
CMP #357, CHRGEN 
BEQ DLBA 
DEC CHRCNT 
BNE 2 
DLEA: ADD #2, DTABP 
MOV SOTABP , CHRGEN 
CMP 877777, CHRGEN 
BNE 1 


;START OF CHANNEL SLEW TESTS 
OL8: 


MOV STRCHR, JLPB 
TSTB so ALPS 
BPL 4 
TSTB = ALPS 
BPL 4 

DL8A: 
MOV JHTABP, MES2OA 
MOV #MES20.PRTMSG 
JSR “4 RIN 

DL: MOV STRCHR, JLPB 
TSTB = ALPS 
BPL 4 
TST aLPS 
BPL 0110 

ERRS7: MOV #57, ERCOUNT 

_ NeNel 





ES 

NSTRUCTION TABLE POINTER 
IR N 

S 


POINTER 


BRANCH IF NO ERROR 
SET UP ERROR COUNT SS 


; REPORT re 


H U 
;TEST READY 
{WAIT FOR READY 
: TEST FOR ERROR 
:BRANCH IF NO ERROR 
;SET UP ERROR COUNT SE 

:REPORT ERROR SET 
:HALT ON ERROR 
RESTART LOAD 

CAD COMMAND? 
:YES, SEND ONLY ONCE 
*LOAD COMMAND? 
:YES, SEND ONLY ONCE 
:DEC PAIR COUN 
:FINISH PAIR IF NOT DONE 
"INC DATA TABLE POINTER 
:SET NEXT DATA PAIR 









;SEND DAVFU INSTRUCTION 
$ READY 

;WAIT FOR READY 

TEST READY 

;WAIT FOR READY 


;SET HEADER MSSG ADDRESS 
;SET HEADER MSG ADDRESS 


:PRINT HEADER MESSAGE 
:SEND DAVFU INSTRUCTION 
- TEST READY 


:WAIT FOR READY 


; TEST FOR ERROR 
: H IF OK 
;SET UP ERROR COUNT 57 









MO4 



















| MAINDEC-11-D2LPK-E-D MACY11 27(732). 27-SEP-76 10:57 PAGE 87 
OZLPKE.P11 





| 2832 013506 04537 o10244 ISR %S, STAER :REPORT ERROR SET 

Be HSE EE? ue ae peo oer % 
| BS BBE BA BER ccc csc, iy SMaerens |Site 

l 7727 000164 000001 SMP dICT TABP, #1 :CHECK IF MAX LINE SLEW 

| 2538 013534 901008 BNE DLiOA :NOT, CONTINUE 
| 2539 913536 013727 O144S2 O12I166 MOV Fs (Mes13+2 SET MESSAGE 

sep 5 eae ga33 14454 12166 DL10A Bev gb 19+ 

~ ( |) $ 

seu 613654 pi 3030 132 Bisige DL1OB: MOV Bs PATMEG Pie ee eae 

2543 013562 904437 010010 JSR 

2544 013566 005337 001056 DEC x4 RINT Dre ING cr NT 

2545 013672 001231 BNE DLS gE INISH tf siiNe esti CHANNEL 
| EEE 137g deers? ooo0g2 ol ADD «#3. MTABP HIN POINTER 
| p84? 013602 062737 000002 013722 ADB #2, HTABP : Soe OG TABLE POINTER 
| 2548 013610 062737 900002 013716 ADD #2, ICTABP INC INSTR COUNT TABLE FOINTER 
| 2549 013616 005777 900074 TST aICTABP :CHECK INSTR COUNT 

2550 013622 006 BNE Bi ie 
| 2551 013684 012737 014366 013716 MOV BTC TAB ICTABP ;RESET TABLE POINTER 
2552 013632 012737 014436 913720 MOV #MTAB, MTABP RESET MSG TABLE POINTER 

2553 013640 017737 OO00S2 O010SE DLie: Mov sic Tate STRCNT ; GET INSTR COUN 

2554 O13646 737 o00002 013714 ADD TTABP : INC INSTR oe POINTER 

255 013654 017737 000034 O01054 MOV si ther, STRCHR  :GET_INSTRUCTION 

esc6 O1stb2 001254 BNE DL8 “CONTINUE IF NOT DONE TEST 

2557 013664 013737 o144s4 O12166 MOV SPSP,MES19+2 :RESET MESSAGE 
| p858 013672 032777 Glo0000 165104 BIT esirle, 3SWR :LOOP ON TEST? 

2559 013700 001402 BEG DLE 

2560 012702 000137 013142 IMP DA 7 :LOOP ON TEST 

e261 013706 000137 O040eE DLEX: JMP TESTe SRECYCLE PRINTING TESTS 

2ce3 013712 OTABP: O ;DATA TABLE POINTER 
| B664 013714 00 ITABP: 0 INSTRUCTION TABLE POINTER 
| psEs 1716 9000 ICTABP: 9 SINSTR COUNT TABLE POINTER 

Ste6 9137 0600 mTage: 6 ‘MESSAGE TABLE POINTER 

ob 613722 909000 HTABP: O :HEADER MESSAGE TABLE POINTER 
| e=83 :DATA TABLE FOR DAVFU LOAD 
| 57] 013724 000356 DTAB: 356 :START LOAD 

S72 013726 000077 77 :HEADER MESSAGES 

2573 013730 000000 9 

2674 013732 00000 1 

2675 012734 0000 2 

2576 013736 ss c 

2577 613740 900000 0 

2578 013742 3 3 

e573 gsr 95510 io 

2581 Bi Soc8 000 2 

2tee i 37ee 000001 I 

2563 013754 5 

2584 013756 000097 7 

ess 013760 oo0c00 0 

2586 013762 000011 il 

2567 013764 000002 2 

2582 013766 O00005 5 


NO4 
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ICTRE: 


2 
l 
fe 
10 
: 
] 
0 
352 :STOP LOAD 
, sSTOP feets 
s INSTRUCTION COUNT TABLE - FOR DAVFU CHANNEL SLEW INSTRUCTIONS 
105 
cs 
42 
23 
; 
0 sEND OF TABLE 


; INSTRUCTION TABLE - DAVFU CHANNEL SLEW INSTRUCTIONS 


ITAB: 


MTRE: 


FS 


200 ;CHANNEL 1 


20} CHANNEL 2 

20e ;CHANNEL 3 

203 CHANNEL 4 

204 ;CHANNEL 5 

20s ;CHANNEL & 

soe area 7 
- 3 

Ae HANNE § 

21] CHANNEL 10 

gts CHANNEL 1 
13 CHANNEL 1 

a) END OF TABLE 

;MESSAGE TABLE FOR BLANK LINE COUNTS IN MESSAGE 

-ASCII 7 |Z 

-ASCII 7 27 

-ASCIT 7 3/ 

-ASCIT 7 6/ 

-ASCIT #247 

Baxtt /\4/ 

-ASCIT #3 / 

ASCII 7 # 


SPSP; 


:SCOPE LOOP ROUTINE 
SET CHARACTER IN SWITCH REGISTER -0. 
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i DZLPKE. 4 
€& ys 
e7se  O144se 37 010030 SCOPE: JSR 99 x4, TYPINT 
753 Ol4462 OITTE? 1E431E 901080 MOV sue SAVE :FETCH SWITCHES 
Bee gisico en 177504 S0153¢ MOV 132. ,CHRCNT SET CHAR COUNT 
Soe] Biauce Baerae ifsuod SSiSEs = = Beal DSMON Save RASK CHARACTER 
| gee 24504 LDOLPX: 
«EES O14504 105777 184270 TSTS = ALPS Tee READY 
«e764 «014510 «150375 SPL 4 WALT FOR READY 
| E785 914512 OOS?T? lesz TST aLPs. ;TEST FOR ERROR 
«EvsE «EIMEIE 1 BPL = LBSCoPE BRANCH IF NO ERROR 
evs? 014520 012737 000060 OO10S2 ERREO: MOV #60,  ERCOUNT ;SET UP ERROR COUNT 60 
2758 00006 N=Nel 
e7sS 014526 1024s JSR XS, STRER ;REPORT ERROR SET 
2775 14532 HALT HALT ON ERR 
e772 014524 013777 901050 164240 LPSCOPE:MOv SAVE, ALPE :LOAD SRINTER. BUFEES 
evre 014542 77? 004000 164234 SIT 61711, aSwr :SEND ONLY ONE CHA 
eres Qi¥552 952402 Beg = LeCo :NO 
e774 014552 HALT SURCT = Wat? FOR OPERATOR 
2775 014554 00075 se SCOPE :NEXT CHAR 
| B77— 614556 900177 po0024 isco: IMP © SLOSCOP :SEND LF? 
e777 pivsbe 305237 Scio CSch: INS CHRENT TINCREMENT CHAR COUNT 
145e€ 0] ENE :CONTINUE IF NOT DONE LINE 
Bore BINES= i255 oooce ie4204 MOV aie, aLPe SEND LF - 
= O1457E 105777 Issi7E TSTE LFS : TEST Y 
2781 514602 155375 L :WAIT FOR READY 
514604 800724 =e écopE : CONTINUE 
2783 
e784 
E785 OLHE0E O14SEz LOSCOP: LSCA 
e786 
e787 
2758 


e7eo 008002 ENO 


; aoa 
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RONVK = D1De42 2334+ 2338 «0 EDNGe BRNS* «ONT = 23S28 
AcvN = 010178 23388 = 234 
BITO = 000001 84s = 1377 1431 
ITi_ = 90000e S478 
Bi til = wee Ge 
Bitié = 5]0005 S38 «1735 «1793s: 1839S 1893) 18421985 
e440 S58 4 
BIT13 = 020000 e2Se 1403 i755 1783 1906 1996 «= 2048 
SIT14 = 040000 S342 988) 1S3E BDH] 
BITIS = 100000 5338 
Bitz = S00004 Sues 
BiT3 = O00010 Bue 
Bits = 9000e0 E458 
BITs = 000040 b438 
BITE = 000100 2e 
BIT? = Oodeno S418 
Bits = 00400 G48 
Fiat BRGEEE ibas, e008 1840 
~ ~ 0 0 i Rg . 
ree met it ie ee jee ee ee ee i ae eee ee 
1esse =] » 7% ” *# 19562 0 0 0 
13] 373g -BidBs © Bivae Birds © Bice 218" 22351 ise © Suzee «SaG2e «gave BSED 
e777 
C o0s044 1808 1615 18318 
tHRGEN OCloso lizes 14i9* [4iS* 1416 i418* 1420 1504" 1592 1593* 1894 1623* 163: 1632 
1633 1744e@ «=«1751)—=S's«sa7S4"=««1787)—Sss«1780)Sss«766e «1779Cs«dP74R OI77E 1777? 1778S‘ 781 
ice 17 eso pels ie | pete isiet 1913, ieee iaace leere 18S Sts 
014 20]7* 2020 oe 20ede «20534 «0b «= aOb7e «20544 adSce «205 2210 = Ea 
2134 9 ]36# «0 2138# «2l3Se El 214? ise is4* «= 2170® «21540 El3* «= 213* «= 232 
2330 0 23318 «23920 BS]2e «421 0 hake |= 4BHe «2453 2E03 SOS Ele ELI 
cHRS == ODEDYE 1826 = 1830s 
ELCKAV 002170 13598 
NTR 6 002620 1337# 14368 = 1444s 
Conv. 010162 3a4e © 23t6 
SonveT 002635 1007, «14331441 HEL 
CR sé i807* = igzs 
O00 DOME 180s 1615 
Fl = OOH740 1609 «IE 14s 
fee CDON744 16iS# 1830 
ea sCOOM7E0 18178 i828 1938 
FE BOEDNE 1821 1832s 
oe? 86s ODE D22 16268 1831 
oseR 001022 1067s 1387* . 
CYCCNT O01044 ties «61413 «1423 1702 1728 1741# 1791% 1805* 18208 1935% 1956@ 198748 1899+ 
0Ce+ 2018* s025+ 205ce 2093+ 2110 2132% 2150* 2155+ el?le 2200* 2397s 
Davey ooze44 1527 15328 
CavFu O14 102 = 243 ss374e 2 
Pavil 9131 E37E+ 240 «0 433" «= eNE* = 24678 
Davie 51314 2279# «624120 B4S4# §=—3439e «= SHED 
CavTas 013070 23820 B44ER 
Devo. © C1470 22828 2389 
bavoo | SLeu7é 23638 3 
evi © S124 2365 23908 
tave  Oiside Idee 40 B442sis«B?Q8 SED 
tevt = 813038 29320-24388 


i “es 
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DILPRKELP LL CROSS SEFERENCE TABLE -- UsiR SYMBOLS 
Dis OT2622 1376# 1368¢ 13968 14378 14514 
OISPl 00 1006 108is L144 
ois 00374 Lolle 1Li44 
DLEX 0137 $$$ 2561 
Bul 013272 2386 esS292 862512 
OL1O =. 13520 2530 2c3ts 
DLIDA 8013 2$38 es4ls 
ul 013554 2540 esies 
=-:5 13s = 2s50 essses 
Ole 013300 sias° 2s08 
DL C1342 497 ec03s 
DLEA 013370 2504 esos 25038 
DL C1414 2Slte e2sc6 
DLS6 CLS 25228 
OLS CL34Sé escte st 
28s! 907700 ee4é cesses 
278 913724 2483 7i8 
DTABP 8013712 2483e 2484 2509* 2510 25638 
oo 012566 23388 2437 
D1 Olebee 2401 240be 
ve 012700 241Se 24 
D3 Ole7ec 241s c4els 
b4 012774 2427 24318 
DS 012560 2333 22378 
ERCOUN 001052 lle7s 1158 1164s 1176#. l186# 11328 
l273% l275# les7* e978 13078 132% 
lLé444 lES4e 1707 1747# 1763+ 1810 
2i78*# 2190# 222248 2288% 2357 2385+ 
ERED 001170 1158s 
Exe] OOlele Ligse 
ERFiO 80001472 12238 
EPRII 001514 1o4Se 
ERRI oo1s44 les3e 
ERRIS 001602 12678 
ERe1S 001624 12738 
ERFiIS OO1640 12788 
ERRIE O01E7e 12878 
ERFI7 O01724 12978 
ERRS O01 1i7g8 
Re 38600] 13078 
FRel 002050 12298 
Roe 72 13358 
ERRSS 124 13428 
ERRO4 C2046 14948 
PReS 38002152 15178 
ERR2—E 386003450 15878 
ERRE7 O02¢3e 16018 
ERRS 001306 11868 
ERRIO 003626 1626s 
ERFS1 003720 lé44e8 
ERRS 004100 LES4s 
ERRS2 OO41SE 17078 
EPRS4 O04364 17478 
ERRIS 004502 17&38 
ERR2E §46 0472 18108 
ERe37 8 §600Se22 18&5s 





GOS 
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91330 119e8 


o- 


Tat 


“KK 0-40-4040 40 00 00 40-00 00-40 40 @ 


1 
ERR4] 9057 19618 
fa 
378 78 
RRS4 71 21038 
ee 
‘ 7S 
ERRS cr 21908 
ERRS ledee 
ERRSO Se ceecs 
prnes (é ecses 
ci 12504 23858 
Eees3 | 012606 24028 
EReS4 = O1E706 24178 
Errss 9913254 e4a78 
013322 24588 
ERRS? 913500 25218 
ErRe 86 01412 12188 
eo Oi 4se e7éTe 
Re 14 lz2e88 
3354 1499 1Scés 
FFTRB 3 O0327 1456 S418 
O1 2538 7518 
BE 003352 1526 [5E38 
HAMALN OO7512 1052 2214e «©2239 
rial X sie e448 
Ham 1x 3% 21S 2237 
| HAME = 22208 22 
HED ©: 10274 2358 «= 2361 0 23678 
HSPRT «© 006054 1048 «= 18922 ©3038 
#50. 0s ODE ED 2005 20 2036 
#500. 40-0061 20 O538 
H550e 606! 185 Ools 
HE; sO} 26 C21 2022 «= 20 
4520 00E215 2008 = 2014s 
3 6 0e 262 2018 = 20248 
4% 006300 2016  20e78 
& 006250 031 20378 
Fee oi aTeE Gee 2523 2547* «2578 
cTee «015366 2481 2851 27198 
CTReP 012716 e4Sle# 2482 2537 ecuee 2549 25514 2553 2565s 
err ees ices ibe? Soe IES] 108 
I ! c8 
NDATO 0034 1626 «= [5S38 
MOAT] Bosese 1600 = 1E0es 
Noo | DOB44E 1585e  159¢ 
NOL © 003524 195 1599 
NTic OS02014 1263 «1318s 
NTID. © OCzI40 1325 134s 
Tee, GiS304 eve grace 
TasP = 013714 24788 $ escve e585 2564s 
WiiL 902350 1032 135s 
WilP © 502306 10345 «1370s Lg 
LOCH «= ss OOMELE 1768 4«=«17?738 «178221787 
Ccex Oi4604 E7628 2778 
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ZL 
LEGCHR 001060 11308 140S* 1408® 1416 1998* 2001s 
LFT 007 21308 
LETTR 07014 1951 21268 2164 
LETO ; gigie ¢1 
LET! 1348 el 
CETS «© 0710 213s 1388 
LET 557122 21418 2153 2156 
ET 007144 ive etars 
| LETS 07174 1S] ithe 
LFTE «BE PEiz 3158 Set eaee 
LINCNT 01042 i1l23e 371% 1384* 1394* 141 1427% 
1505s 1526 1528 1804* 1837#  1e54 
2030+ 2050+ 2052* 2066 2085+ 20894 
2171 2174 e20S5* 2206 2218 e236 
Ls 00102 108S# 1362 3 1399+ 
~sSRY © OOEEE4 i004 4 8=s-« 14448 
LORD. 013232 24838 2451 2502 2535 
LOGICA 907670 38 22488 
LOSCOP 91460 10578 062s e776 2785s 
ce Gre US GED Gk TED ig ia ig Jee Jee Hes ee 
TE3e 2 5 * + * + + + J ] + 7 lt 
2008 Ol4s bess 18 le  eO0b4s 18365 BFS; 2147% 157 elses l34# 2202 O# 
: 7 ~ S2ss# «eerie 2293 2390" 2406e 4214 24934 2517% 2526" 27718 27798 
LPs 001009 10708 1156 ilge 174 118 1190 200 {26 € 237 1243 1249 126 
127]: 1EB1# «=: 1283* «1290 §«=12S2e «:1300e §=130e* «1510s = 13l2e 1327 1333 i34Qe 1350s 
1429 1815 i822 1885 1896 1699 1624 1635 1705 «1725 si«a174HSsi17E 
1767 #1788 £1808 —1823 1833 1863 1878 1913 1927 33 61972 4862028 «= 2085 
e065 0sC«éiwOi)=SssBl3sé«iLH]SCiéiSBECié«‘és7@©=Cfs«éiéiSB40Os«Cé203Ssé22 o227 22342265 2287 
22720 Bev?) 228E2ESE 2383 304 400s? MIS Hea HS HSH 245 
2518 2520 e5e7 #29 e763 e765 2780 
LPSCOP O14534 27660 : 
LPS? BeS2e 20718 . 
[ey 001506 1238 ©61243e «=««1eS2 
[Pe 901530 les «1245s 
a ee 
x * 
[PSH peda i742 17668 
-E2 OS1616 1266 ©=«.:‘ Le? ls 
LP3x 64 loves «e778 
LPS 002964 1328 46-1338 
mae erates {Res $3338 2785 
CSCO 4556 hs 
" = is 10948 1698 17018 1738 7408 1801 8038 185: 18538 1902 19048 1952 1954 
169 is9ge e078 20478 2080 20828 2127 21298 2215 2217s 
MESA 1021 166 165 3678 
res 10 1653 367% 
4 104 1375 367% 
MESOD 010611 23t78 2377 
MES! 010650 149 B3b78 
MESIO 011277 150 23678 
MES11 Oll412 147 2267 
MEEIie 011410 1474 = BaG78 
MESIE = 911460 1453 B3E78 
MEEIS = 011477 1515-3678 
MES14 011706 2265 b2SS ss 23E 78 
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1801% 


5034s 


1655 
1409# 
1894 
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DZLPKE.P LL 
ovRs 46s 1872s: 18918 
PaATTB 003014 1412 4808 
¢  =xQ00007 S3le 2245+ 
PKS = 1024 1088% 1367 
PRNNT 007760 1700 1739 
% 2436 0 BPE 
PeTS ©0051 1322 =: 19378 
PRTCTL 005374 1046 19018 
PETINT 90770 1492 =—s«1692 
PETINO 007720 2286 439-2269 
PATMSS O10026 1474# 86S 14# 
PRTO)}§3»©._:«sO0S 400 19068 1936 
PET] «= - BOS 440 1907 18108 
PETS = OOS446 1$0$ 13lls 
PRTS) DDS HEE 1$i3e 1921 
PRTS © OOS504 1914 «1915s 
ETE oosé22 1830 «=: 19398 
ee ee RE 
' 38 
PS e768 1082s iced» 
PT 001032 10Sie 1264 
PTRVEC OG! 12998 16 - 
ROHR iis 17178 
RDY OK 6 co7le 
RINT 910010 1475 —s«1524 
Bore Boeeis ieee gta 
eri Bee ete, Ett 
Re Spee ae ecaze Site 
ROTS 008704 209 —Sssa21018 
mo 006726 2102 = 21078 
RT 907 21698 2209 
RT] 907254 21708 2207 
RTE 007314 21768 2187 
RT 00723 2177 += e828 
RT 907360 2184 S188 
RTS EE 2175 = 21888 
re ee Het 
RO =%000000 S228 2245s 
& =~00000 823% 
ik =%0000 £248 
3 = 090085 ges 
-¥ 8 
Be | Zppooee aad 
RE  =x000006 828s 830 
R? ss, 8298 g31 
- j ieee 1713s 
CHRSW j 1704 =: 17168 
SCOPE Ol44SE 10S8 86-1062 
GCNT 001034 11208 1908 
TUF 801064 igi? 11358 
CK O00 iO 1476 
02062 198 1498s 
Siwo 0023074 15008 1529 
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ee 1389+ 
8 1gs2 
1944 
22tss 
1530% 2265s 
1340 1942 
1925 1938 
1289 1299% 
lseé* 1353% 
l3eS*# 13528 
2287 22928 
2119 
2117 
2201 
2249 
i7ege 1721 
7 
1063 27588 
1910# \S92h# 
14318 
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1903 1953 $994 2046 2081 2128 2216 e2e8Ss 2381 
2e9Se 2398% 2409% e2411% eSe4e  e2S4ex 
1309# 1339%  1351# 
2399 2410 2425 2525 2543 
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COMMEN ls 
NOCOM lt 
tet ik 
Se it 
MULT ls 
NEWTST ls 
POF ls 
PUSH ls 
REPORT ls 
SETPRI ls 
SETUP ls 
| SKIP is 
| SLASH ls 
STARS ls 
SuRSL 18 
TYPBIN ls 
TYPDEC le 
| TYPNAM le 
TYPNUM is 
TYPOCS ls 
| TYPOCT ls 
TYPTXT 1g 
| SERROR 11008 1158 116s 1178 1186 1198 1208 1218 
5 = 157 tee 13 tae Bat Ey ? $745 
= fits leks es. | 2531 2767 a 
BR" «i783 1828 «EERSTE SSTRRE: 1G 
2113 2158 2203 e226 2234 2276 23904 2407 
| $SESCA ls 
| SSNEKT ls 
| $SSKIP ls 
-EGUART ls 
. HEADE ls 
-KTL1I ls 
. SETUP ls 
|; SWRHI is 
| .$ACT1 ls 
| -SAPTB ls 
. SAPTH ls 
SAPTY ls 
SAST ls 
SCATC is 
SOMTA ls 
$0820 ls 
- $0820 ls 
* +s 2 
° 28 
. SERRO ls 
SERRT - 36ls 
A 8 ls 
ls 
: is 
. SRODE ls 
. $000 ls 
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| OC wuSus2S 85S ME? gH? soo} 
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fe 1263 iese «1302 «= sgie «= 1380145] «1868 = 23389 
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BLE 5635 
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